From 6a8f124fd1b9ccd3ed9715bc7d89efa98405c2c9 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Thu, 23 Feb 2006 15:50:46 +0000 Subject: [PATCH] lag/drag/void profiling fix We were searching the wrong part of the heap for dead objects, this was broken by recent changes to the step structure: from-space is now in step->old_blocks, not step->blocks. Fortunately some assertions in ProfHeap picked up the problem. --- ghc/rts/LdvProfile.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/rts/LdvProfile.c b/ghc/rts/LdvProfile.c index 18daf5a..19ebe42 100644 --- a/ghc/rts/LdvProfile.c +++ b/ghc/rts/LdvProfile.c @@ -320,7 +320,7 @@ LdvCensusForDead( nat N ) processNurseryForDead(); processChainForDead(generations[g].steps[s].large_objects); } else{ - processHeapForDead(generations[g].steps[s].blocks); + processHeapForDead(generations[g].steps[s].old_blocks); processChainForDead(generations[g].steps[s].large_objects); } } -- 1.7.10.4