summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-10-13 18:51:27 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-10-15 21:58:27 -0400
commitd495f36a8fb96f26fae4043364b8a7f38b884e00 (patch)
tree78f9e02db7e15b3bc4e1337b6c30908d0f6e1457
parent6b14c4185ca944295d5cfa60ebc6f7ab2a257fc9 (diff)
downloadhaskell-d495f36a8fb96f26fae4043364b8a7f38b884e00.tar.gz
rts: Clean-up whitespace in Interpreter
-rw-r--r--rts/Interpreter.c20
1 files changed, 10 insertions, 10 deletions
diff --git a/rts/Interpreter.c b/rts/Interpreter.c
index b7575b3051..237b9c848a 100644
--- a/rts/Interpreter.c
+++ b/rts/Interpreter.c
@@ -1478,11 +1478,11 @@ run_BCO:
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;
}
@@ -1504,11 +1504,11 @@ run_BCO:
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;
}