diff options
author | Ben Gamari <ben@smart-cactus.org> | 2020-12-09 22:06:22 -0500 |
---|---|---|
committer | Ben Gamari <ben@well-typed.com> | 2020-12-20 21:05:13 -0500 |
commit | 19823708258224266e75b0236719313b9022aba4 (patch) | |
tree | 2f2ec5e2ac325c5758de43232557ed24957bb4e8 | |
parent | b4508bd6f8b6492d2e74053d7338980109174861 (diff) | |
download | haskell-19823708258224266e75b0236719313b9022aba4.tar.gz |
nonmoving: Fix small CPP bug
Previously an incorrect semicolon meant that we would fail to call
busy_wait_nop when spinning.
-rw-r--r-- | rts/sm/NonMovingMark.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/rts/sm/NonMovingMark.c b/rts/sm/NonMovingMark.c index d1b625f7e3..f6272282a8 100644 --- a/rts/sm/NonMovingMark.c +++ b/rts/sm/NonMovingMark.c @@ -737,9 +737,11 @@ void updateRemembSetPushStack(Capability *cap, StgStack *stack) // The concurrent GC has claimed the right to mark the stack. // Wait until it finishes marking before proceeding with // mutation. - while (needs_upd_rem_set_mark((StgClosure *) stack)); + while (needs_upd_rem_set_mark((StgClosure *) stack)) #if defined(PARALLEL_GC) busy_wait_nop(); // TODO: Spinning here is unfortunate +#else + ; #endif return; } |