From 7b414bae653d27a60bdd78939330d5697e8f018a Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 12 Jan 2006 13:49:24 +0000
Subject: [PATCH 1/1] [project @ 2006-01-12 13:49:24 by simonmar] fix
 calculation of copied bytes, we had a words/bytes
 mismatch when adding the size of the mutable list

---
 ghc/rts/GC.c |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/rts/GC.c b/ghc/rts/GC.c
index 1641e3a..c7f9a79 100644
--- 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;
 	}
     }
 
-- 
1.7.10.4