X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FProfHeap.c;h=b9fc7b309cdf2c433d312bdc9dfecc033b7d8b9b;hb=95d4b4c552cef8a33bbfb37361e90c079d65134b;hp=69dd798ac3d03d34eea52c0e536d1a8fc8933009;hpb=45da48d70d589548c8f7c6c49eafb1ef463ebfb5;p=ghc-hetmet.git

diff --git a/rts/ProfHeap.c b/rts/ProfHeap.c
index 69dd798..b9fc7b3 100644
--- a/rts/ProfHeap.c
+++ b/rts/ProfHeap.c
@@ -1086,7 +1086,7 @@ heapCensus( void )
 
   // Traverse the heap, collecting the census info
   if (RtsFlags.GcFlags.generations == 1) {
-      heapCensusChain( census, g0s0->blocks );
+      heapCensusChain( census, g0->steps[0].blocks );
   } else {
       for (g = 0; g < RtsFlags.GcFlags.generations; g++) {
 	  for (s = 0; s < generations[g].n_steps; s++) {