From 1a84ec2aeb34eec7117aecc5a450064a9ac1c747 Mon Sep 17 00:00:00 2001
From: Simon Marlow <marlowsd@gmail.com>
Date: Mon, 28 Sep 2009 14:53:49 +0000
Subject: [PATCH] remove TICK_GC_WORDS_COPIED, the GC stats give us the same
 thing

---
 includes/stg/Ticky.h |    3 ---
 rts/Ticky.c          |    4 ----
 rts/sm/Evac.c        |    6 ------
 3 files changed, 13 deletions(-)

diff --git a/includes/stg/Ticky.h b/includes/stg/Ticky.h
index b66c8b2..e173aa7 100644
--- a/includes/stg/Ticky.h
+++ b/includes/stg/Ticky.h
@@ -117,8 +117,6 @@ EXTERN StgInt GC_SEL_MAJOR_ctr INIT(0);
 
 EXTERN StgInt GC_FAILED_PROMOTION_ctr INIT(0);
 
-EXTERN StgInt GC_WORDS_COPIED_ctr INIT(0);
-
 EXTERN StgInt ALLOC_UP_THK_ctr INIT(0);
 EXTERN StgInt ALLOC_SE_THK_ctr INIT(0);
 EXTERN StgInt ALLOC_THK_adm INIT(0);
@@ -178,7 +176,6 @@ EXTERN StgInt RET_SEMI_loads_avoided INIT(0);
 #define TICK_UPD_NEW_IND()
 #define TICK_UPD_SQUEEZED()
 #define TICK_ALLOC_HEAP_NOCTR(x)
-#define TICK_GC_WORDS_COPIED(x)
 #define TICK_GC_FAILED_PROMOTION()
 #define TICK_ALLOC_TSO(g,s)
 #define TICK_ALLOC_UP_THK(g,s)
diff --git a/rts/Ticky.c b/rts/Ticky.c
index 75aa4b1..140a705 100644
--- a/rts/Ticky.c
+++ b/rts/Ticky.c
@@ -307,9 +307,6 @@ PrintTickyInfo(void)
 	      PC(INTAVG(tot_old_updates,tot_gengc_updates)));
   }
 
-  fprintf(tf,"\nTotal bytes copied during GC: %ld\n",
-	  GC_WORDS_COPIED_ctr * sizeof(W_));
-
   printRegisteredCounterInfo(tf);
 
   fprintf(tf,"\n**************************************************\n");
@@ -567,7 +564,6 @@ PrintTickyInfo(void)
   PR_CTR(GC_SEL_MINOR_ctr);
   PR_CTR(GC_SEL_MAJOR_ctr);
   PR_CTR(GC_FAILED_PROMOTION_ctr);
-  PR_CTR(GC_WORDS_COPIED_ctr);
 }
 
 /* To print out all the registered-counter info: */
diff --git a/rts/sm/Evac.c b/rts/sm/Evac.c
index 6fcafc4..5836210 100644
--- a/rts/sm/Evac.c
+++ b/rts/sm/Evac.c
@@ -97,8 +97,6 @@ copy_tag(StgClosure **p, const StgInfoTable *info,
 
     to = alloc_for_copy(size,stp);
     
-    TICK_GC_WORDS_COPIED(size);
-
     from = (StgPtr)src;
     to[0] = (W_)info;
     for (i = 1; i < size; i++) { // unroll for small i
@@ -143,8 +141,6 @@ copy_tag_nolock(StgClosure **p, const StgInfoTable *info,
     *p = TAG_CLOSURE(tag,(StgClosure*)to);
     src->header.info = (const StgInfoTable *)MK_FORWARDING_PTR(to);
     
-    TICK_GC_WORDS_COPIED(size);
-
     from = (StgPtr)src;
     to[0] = (W_)info;
     for (i = 1; i < size; i++) { // unroll for small i
@@ -195,8 +191,6 @@ spin:
     to = alloc_for_copy(size_to_reserve, stp);
     *p = (StgClosure *)to;
 
-    TICK_GC_WORDS_COPIED(size_to_copy);
-
     from = (StgPtr)src;
     to[0] = info;
     for (i = 1; i < size_to_copy; i++) { // unroll for small i
-- 
1.7.10.4