X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfHeap.c;fp=ghc%2Frts%2FProfHeap.c;h=e9735e7ed49208c940a07a6d667e462c035bbee2;hb=37ee58b05f0ceeca0d5a6d802146f5b39a86683b;hp=b640feaa1d8f05f577eb9da8eb1a34c408e0bf0d;hpb=928e00e2a994559bf0eeb56dff22c7a3cf5c68be;p=ghc-hetmet.git

diff --git a/ghc/rts/ProfHeap.c b/ghc/rts/ProfHeap.c
index b640fea..e9735e7 100644
--- a/ghc/rts/ProfHeap.c
+++ b/ghc/rts/ProfHeap.c
@@ -938,6 +938,7 @@ heapCensusChain( Census *census, bdescr *bd )
 		
 	    case MUT_ARR_PTRS:
 	    case MUT_ARR_PTRS_FROZEN:
+	    case MUT_ARR_PTRS_FROZEN0:
 		prim = rtsTrue;
 		size = mut_arr_ptrs_sizeW((StgMutArrPtrs *)p);
 		break;