[project @ 2005-07-26 14:42:53 by simonmar]

add missing case for MUT_ARR_PTRS_FROZEN0 (might fix some cases of
"internal error: heapCensus" in the HEAD)

diff --git a/ghc/rts/ProfHeap.c b/ghc/rts/ProfHeap.c
index b640fea..e9735e7 100644 (file)
--- 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;