[svn:parrot] r29815 - branches/gsoc_pdd09/src/gc

[Whiteknight@xxxxxxxxxxxx]

Author: Whiteknight
Date: Sun Jul 27 18:09:19 2008
New Revision: 29815

Modified:
   branches/gsoc_pdd09/src/gc/dod.c
   branches/gsoc_pdd09/src/gc/smallobject.c

Log:
[gsoc_pdd09] remove a stupid comment that I added earlier (I figured out what 
was going on, finally) and fix the return value in Parrot_dod_trace_root

Modified: branches/gsoc_pdd09/src/gc/dod.c
==============================================================================
--- branches/gsoc_pdd09/src/gc/dod.c    (original)
+++ branches/gsoc_pdd09/src/gc/dod.c    Sun Jul 27 18:09:19 2008
@@ -388,7 +388,8 @@
     if (trace_stack) {
         trace_system_areas(interp);
         if (trace_stack == 2)
-            return 0;
+            return !(arena_base->lazy_dod && arena_base->num_early_PMCs_seen >=
+                arena_base->num_early_DOD_PMCs);
     }
 
     if (interp->profile)

Modified: branches/gsoc_pdd09/src/gc/smallobject.c
==============================================================================
--- branches/gsoc_pdd09/src/gc/smallobject.c    (original)
+++ branches/gsoc_pdd09/src/gc/smallobject.c    Sun Jul 27 18:09:19 2008
@@ -152,7 +152,6 @@
         if (arena) {
             if (arena->used == arena->total_objects)
                 Parrot_do_dod_run(interp, GC_trace_stack_FLAG);
-            /* the <= doesn't make any sense, should it be >= instead? */
             if (pool->num_free_objects <= pool->replenish_level)
                 pool->skip = 1;
         }