projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 1999-03-20 17:33:07 by sof]
[ghc-hetmet.git]
/
ghc
/
rts
/
DebugProf.c
diff --git
a/ghc/rts/DebugProf.c
b/ghc/rts/DebugProf.c
index
f5ad811
..
7cd73eb
100644
(file)
--- a/
ghc/rts/DebugProf.c
+++ b/
ghc/rts/DebugProf.c
@@
-1,7
+1,7
@@
/* -----------------------------------------------------------------------------
/* -----------------------------------------------------------------------------
- * $Id: DebugProf.c,v 1.4 1999/01/15 17:57:05 simonm Exp $
+ * $Id: DebugProf.c,v 1.6 1999/02/05 16:02:36 simonm Exp $
*
*
- * (c) The GHC Team 1998
+ * (c) The GHC Team 1998-1999
*
* Simple Heap Profiling
*
*
* Simple Heap Profiling
*
@@
-162,7
+162,6
@@
static char *type_names[] = {
, "ARR_WORDS"
, "ARR_WORDS"
- , "MUT_ARR_WORDS"
, "MUT_ARR_PTRS"
, "MUT_ARR_PTRS_FROZEN"
, "MUT_VAR"
, "MUT_ARR_PTRS"
, "MUT_ARR_PTRS_FROZEN"
, "MUT_VAR"
@@
-313,7
+312,6
@@
heapCensus(bdescr *bd)
break;
case ARR_WORDS:
break;
case ARR_WORDS:
- case MUT_ARR_WORDS:
size = arr_words_sizeW(stgCast(StgArrWords*,p));
break;
size = arr_words_sizeW(stgCast(StgArrWords*,p));
break;