summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-10-22 16:33:06 +0000
committerZubin Duggal <zubin.duggal@gmail.com>2023-02-08 14:54:29 +0530
commit0c85bf302176def179609c0950a6ce6a496bcc1e (patch)
tree1296ad876797e62c9d3023a01dc25c598cf2bead
parent67b43a1447f987e5a841f68cd4c441ea8f272df7 (diff)
downloadhaskell-0c85bf302176def179609c0950a6ce6a496bcc1e.tar.gz
nonmoving: Fix style
(cherry picked from commit b642ef1dc4cbe19c3479b2c014e7d1f7959f8e4a)
-rw-r--r--rts/sm/NonMoving.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/rts/sm/NonMoving.c b/rts/sm/NonMoving.c
index 8fa910dc2c..e224ce3478 100644
--- a/rts/sm/NonMoving.c
+++ b/rts/sm/NonMoving.c
@@ -1075,10 +1075,11 @@ static void nonmovingMark_(MarkQueue *mark_queue, StgWeak **dead_weaks, StgTSO *
// Set snapshot
nonmovingSegmentInfo(seg)->next_free_snap = seg->next_free;
n_filled++;
- if (seg->link)
+ if (seg->link) {
seg = seg->link;
- else
+ } else {
break;
+ }
}
// add filled segments to sweep_list
SET_SEGMENT_STATE(seg, FILLED_SWEEPING);