summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSylvain Henry <sylvain@haskus.fr>2021-06-16 14:23:01 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-06-19 12:23:39 -0400
commit6b2952cfab2dff6eafa0bd5c5a5f4e75e757b392 (patch)
tree74ab1591c1ab508c3c89f071ecd8781e092bdd9c
parent028b947490cd8ce433889561b0e298286e963024 (diff)
downloadhaskell-6b2952cfab2dff6eafa0bd5c5a5f4e75e757b392.tar.gz
RTS: fix indentation warning
-rw-r--r--rts/Interpreter.c26
1 files changed, 14 insertions, 12 deletions
diff --git a/rts/Interpreter.c b/rts/Interpreter.c
index b2aa5e1e6c..d6478a0164 100644
--- a/rts/Interpreter.c
+++ b/rts/Interpreter.c
@@ -1612,13 +1612,14 @@ run_BCO:
ASSERT(get_itbl(ap->fun)->type == BCO
&& BCO_BITMAP_SIZE(ap->fun) == ap->n_args);
- for (i = 0; i < n_payload; i++)
+ for (i = 0; i < n_payload; i++) {
ap->payload[i] = (StgClosure*)SpW(i+1);
- Sp_addW(n_payload+1);
- IF_DEBUG(interpreter,
- debugBelch("\tBuilt ");
- printObj((StgClosure*)ap);
- );
+ }
+ Sp_addW(n_payload+1);
+ IF_DEBUG(interpreter,
+ debugBelch("\tBuilt ");
+ printObj((StgClosure*)ap);
+ );
goto nextInsn;
}
@@ -1638,13 +1639,14 @@ run_BCO:
barf("bci_MKPAP");
}
- for (i = 0; i < n_payload; i++)
+ for (i = 0; i < n_payload; i++) {
pap->payload[i] = (StgClosure*)SpW(i+1);
- Sp_addW(n_payload+1);
- IF_DEBUG(interpreter,
- debugBelch("\tBuilt ");
- printObj((StgClosure*)pap);
- );
+ }
+ Sp_addW(n_payload+1);
+ IF_DEBUG(interpreter,
+ debugBelch("\tBuilt ");
+ printObj((StgClosure*)pap);
+ );
goto nextInsn;
}