diff options
author | Ben Gamari <ben@smart-cactus.org> | 2022-11-23 19:44:18 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2023-01-09 13:55:05 -0500 |
commit | 07a70cd0e6b6d636cf6c68e6a96e89712a6809a7 (patch) | |
tree | 565c9e098ca2db664c98ed6e5143330f6a2fcc87 | |
parent | 8906d0e4dc987638e56a30d5e8f448c454ec220f (diff) | |
download | haskell-07a70cd0e6b6d636cf6c68e6a96e89712a6809a7.tar.gz |
rts/Sanity: Look at nonmoving saved_filled lists
-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 e3fa74efae..a8a7a3d9c6 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -634,6 +634,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]); @@ -1066,6 +1067,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]); |