From f03a153774a781e43ee52007a71ae5c1a24467f1 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Fri, 29 Nov 2013 12:03:48 +0900
Subject: [PATCH] add freed object counter

---
 src/gc.c | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/gc.c b/src/gc.c
index d0fbf1e3..ab86bdef 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -476,6 +476,9 @@ static void
 gc_sweep_phase(pic_state *pic)
 {
   union header *basep, *bp, *p, *s = NULL, *t;
+#if DEBUG
+  int c = 0;
+#endif
 
   basep = &pic->heap->base;
   for (bp = basep->s.ptr; bp != basep; bp = bp->s.ptr) {
@@ -502,7 +505,14 @@ gc_sweep_phase(pic_state *pic)
     gc_finalize_object(pic, (struct pic_object *)(s + 1));
     gc_free(pic, s);
     s = p;
+#if DEBUG
+    c++;
+#endif
   }
+
+#if DEBUG
+  printf("freed %d objects!\n", c);
+#endif
 }
 
 void