projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
[project @ 2006-01-12 13:49:24 by simonmar]
[ghc-hetmet.git]
/
ghc
/
rts
/
GC.c
diff --git
a/ghc/rts/GC.c
b/ghc/rts/GC.c
index
1641e3a
..
c7f9a79
100644
(file)
--- a/
ghc/rts/GC.c
+++ b/
ghc/rts/GC.c
@@
-793,7
+793,7
@@
GarbageCollect ( void (*get_roots)(evac_fn), rtsBool force_major_gc )
// stats. Every mutable list is copied during every GC.
if (g > 0) {
for (bd = generations[g].mut_list; bd != NULL; bd = bd->link) {
- copied += (bd->free - bd->start) * sizeof(StgWord);
+ copied += bd->free - bd->start;
}
}