diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2019-05-17 13:28:53 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2019-10-22 12:20:37 -0400 |
| commit | 6dcef5eedaee9a9ecd8b0e41c5f5b93512e6f6c9 (patch) | |
| tree | d02a9969660658505c9d36488886942fa68838a0 /rts/sm/NonMoving.c | |
| parent | c936a245e723f2ffdbfcb29432cf7131146fbbe3 (diff) | |
| download | haskell-6dcef5eedaee9a9ecd8b0e41c5f5b93512e6f6c9.tar.gz | |
NonMoving: Move block size to block descriptor
Diffstat (limited to 'rts/sm/NonMoving.c')
| -rw-r--r-- | rts/sm/NonMoving.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/rts/sm/NonMoving.c b/rts/sm/NonMoving.c index e11a029b5a..5a6b9e7837 100644 --- a/rts/sm/NonMoving.c +++ b/rts/sm/NonMoving.c @@ -204,13 +204,14 @@ static void nonmovingMark_(MarkQueue *mark_queue, StgWeak **dead_weaks, StgTSO * static void nonmovingInitSegment(struct NonmovingSegment *seg, uint8_t log_block_size) { + bdescr *bd = Bdescr((P_) seg); seg->link = NULL; seg->todo_link = NULL; seg->next_free = 0; seg->next_free_snap = 0; - seg->log_block_size = log_block_size; nonmovingClearBitmap(seg); - Bdescr((P_)seg)->u.scan = nonmovingSegmentGetBlock(seg, 0); + bd->nonmoving_segment.log_block_size = log_block_size; + bd->u.scan = nonmovingSegmentGetBlock(seg, 0); } // Add a segment to the free list. |