[svn:parrot] r49671 - branches/generational_gc/src/gc

bacek at svn.parrot.org bacek at svn.parrot.org
Mon Oct 25 10:32:51 UTC 2010


Author: bacek
Date: Mon Oct 25 10:32:51 2010
New Revision: 49671
URL: https://trac.parrot.org/parrot/changeset/49671

Log:
Wrap validating functions in ifndef NEBUG.

Modified:
   branches/generational_gc/src/gc/gc_ms2.c

Modified: branches/generational_gc/src/gc/gc_ms2.c
==============================================================================
--- branches/generational_gc/src/gc/gc_ms2.c	Mon Oct 25 10:32:39 2010	(r49670)
+++ branches/generational_gc/src/gc/gc_ms2.c	Mon Oct 25 10:32:51 2010	(r49671)
@@ -681,7 +681,9 @@
     else
         gen = self->current_generation = 0;
 
+#ifdef DETAIL_MEMORY_DEBUG
     gc_ms2_print_stats(interp, "Before", gen);
+#endif
 
     gc_ms2_check_sanity(interp);
 
@@ -800,9 +802,15 @@
 
     gc_ms2_check_sanity(interp);
 
+#ifdef DETAIL_MEMORY_DEBUG
     gc_ms2_print_stats(interp, "Bringing", gen);
+#endif
+
     gc_ms2_bring_them_together(interp, old_object_tails);
+
+#ifdef DETAIL_MEMORY_DEBUG
     gc_ms2_print_stats(interp, "Here", gen);
+#endif
 
 
     /* Now. Sweep all dead objects */
@@ -871,7 +879,9 @@
 
     gc_ms2_ensure_flags(interp);
 
+#ifdef DETAIL_MEMORY_DEBUG
     gc_ms2_print_stats(interp, "After", gen);
+#endif
 }
 
 /*
@@ -942,7 +952,7 @@
 
     gc_ms2_check_sanity(interp);
 
-#if 1
+#ifndef NDEBUG
     // DEBUG ONLY. Simple recursive check
     interp->gc_sys->mark_pmc_header = gc_ms2_pmc_validate;
     interp->gc_sys->mark_str_header = gc_ms2_string_validate;
@@ -2143,7 +2153,7 @@
 gc_ms2_check_sanity(PARROT_INTERP)
 {
     ASSERT_ARGS(gc_ms2_check_sanity)
-
+#ifndef NDEBUG
     MarkSweep_GC     *self = (MarkSweep_GC *)interp->gc_sys->gc_private;
     List_Item_Header *tmp;
     int gen;
@@ -2158,6 +2168,7 @@
             tmp = tmp->next;
         }
     }
+#endif
 }
 
 /*
@@ -2175,7 +2186,6 @@
 gc_ms2_print_stats(PARROT_INTERP, const char* header, int gen)
 {
     ASSERT_ARGS(gc_ms2_print_stats)
-#ifdef DETAIL_MEMORY_DEBUG
     MarkSweep_GC     *self = (MarkSweep_GC *)interp->gc_sys->gc_private;
 
     fprintf(stderr, "%s\ngen: %d\n0: %d %d\n1: %d %d\n2: %d %d\n",
@@ -2197,7 +2207,6 @@
 
     fprintf(stderr, "\n");
 
-#endif
 }
 
 static void
@@ -2215,6 +2224,7 @@
 static void
 gc_ms2_ensure_flags(PARROT_INTERP)
 {
+#ifndef NDEBUG
     MarkSweep_GC     *self = (MarkSweep_GC *)interp->gc_sys->gc_private;
     gc_ms2_ensure_flags_in_list(interp, self->objects[0]);
     gc_ms2_ensure_flags_in_list(interp, self->objects[1]);
@@ -2222,6 +2232,7 @@
     gc_ms2_ensure_flags_in_list(interp, self->strings[0]);
     gc_ms2_ensure_flags_in_list(interp, self->strings[1]);
     gc_ms2_ensure_flags_in_list(interp, self->strings[2]);
+#endif
 }
 
 /*


More information about the parrot-commits mailing list