[svn:parrot] r47210 - branches/gc_massacre/src/gc

bacek at svn.parrot.org bacek at svn.parrot.org
Mon May 31 11:41:05 UTC 2010


Author: bacek
Date: Mon May 31 11:41:04 2010
New Revision: 47210
URL: https://trac.parrot.org/parrot/changeset/47210

Log:
Disable debug output.

Modified:
   branches/gc_massacre/src/gc/gc_tms.c

Modified: branches/gc_massacre/src/gc/gc_tms.c
==============================================================================
--- branches/gc_massacre/src/gc/gc_tms.c	Mon May 31 10:40:44 2010	(r47209)
+++ branches/gc_massacre/src/gc/gc_tms.c	Mon May 31 11:41:04 2010	(r47210)
@@ -640,14 +640,14 @@
     self->objects      = Parrot_gc_allocate_linked_list(interp);
     self->grey_objects = Parrot_gc_allocate_linked_list(interp);
 
-    fprintf(stderr, "Before %d\n", self->dead_objects->count);
+    //fprintf(stderr, "Before %d\n", self->dead_objects->count);
 
     /*
     self.grey_objects  = self.trace_roots();
     */
     Parrot_gc_trace_root(interp, NULL, GC_TRACE_FULL);
 
-    fprintf(stderr, "Roots %d\n", self->grey_objects->count);
+    //fprintf(stderr, "Roots %d\n", self->grey_objects->count);
 
     /*
     # mark_alive will push into self.grey_objects
@@ -662,7 +662,7 @@
         ++counter;
     }
 
-    fprintf(stderr, "Processed grey: %d\n", counter);
+    //fprintf(stderr, "Processed grey: %d\n", counter);
 
     /*
     # Sweep
@@ -671,7 +671,7 @@
         self.allocator.free($dead);
     }
     */
-    fprintf(stderr, "Killing %d\n", self->dead_objects->count);
+    //fprintf(stderr, "Killing %d\n", self->dead_objects->count);
     tmp = self->dead_objects->first;
     counter = 0;
     while (tmp) {
@@ -680,10 +680,10 @@
         tmp = next;
         ++counter;
     }
-    fprintf(stderr, "Processed dead %d\n", counter);
+    //fprintf(stderr, "Processed dead %d\n", counter);
 
-    fprintf(stderr, "Survived %d\n", self->objects->count);
-    fprintf(stderr, "Dead %d\n", self->dead_objects->count);
+    //fprintf(stderr, "Survived %d\n", self->objects->count);
+    //fprintf(stderr, "Dead %d\n", self->dead_objects->count);
 
     /* Clean up */
     Parrot_gc_destroy_linked_list(interp, self->grey_objects);


More information about the parrot-commits mailing list