Commit 8b85ebc3 authored by Simon Marlow's avatar Simon Marlow
Browse files

Don't call processHeapClosureForDead on pinned blocks

Fixes heapprof001(prof_hp) after fix for #2917
parent 5ed9db73
......@@ -266,7 +266,9 @@ processChainForDead( bdescr *bd )
{
// Any object still in the chain is dead!
while (bd != NULL) {
processHeapClosureForDead((StgClosure *)bd->start);
if (!(bd->flags & BF_PINNED)) {
processHeapClosureForDead((StgClosure *)bd->start);
}
bd = bd->link;
}
}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment