diff options
author | Ben Gamari <ben@smart-cactus.org> | 2022-11-23 19:44:18 -0500 |
---|---|---|
committer | Zubin Duggal <zubin.duggal@gmail.com> | 2023-04-14 13:07:38 +0530 |
commit | 70a8ca3f573eadf383682c1c9ea35b0c893c3f2e (patch) | |
tree | e7177aa1164b0919fb74dfc13882b9cd685d227d | |
parent | a7be6c65bf59ec1bb17c7e4c2145fb8ce56fd29f (diff) | |
download | haskell-70a8ca3f573eadf383682c1c9ea35b0c893c3f2e.tar.gz |
rts/Sanity: Look at nonmoving saved_filled lists
(cherry picked from commit ce4cf9d59552b52ae3d4c1c1e71a83296f022c27)
-rw-r--r-- | rts/sm/Sanity.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c index 729bd2a350..3d929b8849 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -621,6 +621,7 @@ void checkNonmovingHeap (const struct NonmovingHeap *heap) for (unsigned int i=0; i < NONMOVING_ALLOCA_CNT; i++) { const struct NonmovingAllocator *alloc = heap->allocators[i]; checkNonmovingSegments(alloc->filled); + checkNonmovingSegments(alloc->saved_filled); checkNonmovingSegments(alloc->active); for (unsigned int cap=0; cap < getNumCapabilities(); cap++) { checkNonmovingSegments(alloc->current[cap]); @@ -1049,6 +1050,7 @@ findMemoryLeak (void) for (i = 0; i < NONMOVING_ALLOCA_CNT; i++) { struct NonmovingAllocator *alloc = nonmovingHeap.allocators[i]; markNonMovingSegments(alloc->filled); + markNonMovingSegments(alloc->saved_filled); markNonMovingSegments(alloc->active); for (j = 0; j < getNumCapabilities(); j++) { markNonMovingSegments(alloc->current[j]); |