diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-11-18 14:28:37 -0500 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2023-03-08 15:02:30 -0500 |
| commit | 6283144fb2e98f4c774950567e55575c1747d136 (patch) | |
| tree | 1d6cf734d64b2d913c2a3f387907f67d544c96fd | |
| parent | 5b7f65767fbc2967e01a13ee580598e976f5d225 (diff) | |
| download | haskell-6283144fb2e98f4c774950567e55575c1747d136.tar.gz | |
rts/Sanity: Mark pinned_object_blocks
| -rw-r--r-- | rts/sm/Sanity.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c index a77eb08d7a..e3fa74efae 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -1053,6 +1053,7 @@ findMemoryLeak (void) for (i = 0; i < getNumCapabilities(); i++) { markBlocks(gc_threads[i]->free_blocks); markBlocks(getCapability(i)->pinned_object_block); + markBlocks(getCapability(i)->pinned_object_blocks); markBlocks(getCapability(i)->upd_rem_set.queue.blocks); } |