summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2023-02-08 12:07:57 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2023-03-08 15:02:31 -0500
commit4eb9d06b00043e52be3cf828ccb92f0bb4c9e438 (patch)
tree2da7fd1be88b562478a33c26535cd0afc42180a1
parent3ae0f368542b24b2ee2cd102cf65db8db705c83c (diff)
downloadhaskell-4eb9d06b00043e52be3cf828ccb92f0bb4c9e438.tar.gz
nonmoving: Ensure that sanity checker accounts for saved_filled segments
-rw-r--r--rts/sm/Sanity.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index a8cf074989..fa497251e2 100644
--- a/rts/sm/Sanity.c
+++ b/rts/sm/Sanity.c
@@ -1199,6 +1199,7 @@ countNonMovingHeap(struct NonmovingHeap *heap)
for (int alloc_idx = 0; alloc_idx < NONMOVING_ALLOCA_CNT; alloc_idx++) {
struct NonmovingAllocator *alloc = &heap->allocators[alloc_idx];
ret += countNonMovingSegments(alloc->filled);
+ ret += countNonMovingSegments(alloc->saved_filled);
ret += countNonMovingSegments(alloc->active);
for (uint32_t c = 0; c < getNumCapabilities(); ++c) {
Capability *cap = getCapability(c);