[svn:parrot] r49331 - in branches/generational_gc: include/parrot src/gc

[bacek at svn.parrot.org]

Author: bacek
Date: Sun Sep 26 03:42:40 2010
New Revision: 49331
URL: https://trac.parrot.org/parrot/changeset/49331

Log:
Remove useless PObj_custom_GC_FLAG

Modified:
   branches/generational_gc/include/parrot/pobj.h
   branches/generational_gc/src/gc/mark_sweep.c

Modified: branches/generational_gc/include/parrot/pobj.h
==============================================================================
--- branches/generational_gc/include/parrot/pobj.h	Sun Sep 26 03:42:09 2010	(r49330)
+++ branches/generational_gc/include/parrot/pobj.h	Sun Sep 26 03:42:40 2010	(r49331)
@@ -164,8 +164,6 @@
 /* GC FLAGS */
     /* Set to true if the PObj has a custom mark routine */
     PObj_custom_mark_FLAG       = POBJ_FLAG(19),
-    /* Mark the buffer as needing GC */
-    PObj_custom_GC_FLAG         = POBJ_FLAG(20),
     /* Set if the PObj has a destroy method that must be called */
     PObj_custom_destroy_FLAG    = POBJ_FLAG(21),
     /* For debugging, report when this buffer gets moved around */
@@ -239,10 +237,6 @@
 #define PObj_report_SET(o) PObj_flag_SET(report, o)
 #define PObj_report_CLEAR(o) PObj_flag_CLEAR(report, o)
 
-#define PObj_grey_TEST(o) gc_flag_TEST(grey, o)
-#define PObj_grey_SET(o) gc_flag_SET(grey, o)
-#define PObj_grey_CLEAR(o) gc_flag_CLEAR(grey, o)
-
 #define PObj_on_free_list_TEST(o) gc_flag_TEST(on_free_list, o)
 #define PObj_on_free_list_SET(o) gc_flag_SET(on_free_list, o)
 #define PObj_on_free_list_CLEAR(o) gc_flag_CLEAR(on_free_list, o)

Modified: branches/generational_gc/src/gc/mark_sweep.c
==============================================================================
--- branches/generational_gc/src/gc/mark_sweep.c	Sun Sep 26 03:42:09 2010	(r49330)
+++ branches/generational_gc/src/gc/mark_sweep.c	Sun Sep 26 03:42:40 2010	(r49331)
@@ -279,7 +279,6 @@
             if (PObj_live_TEST(b)) {
                 ++total_used;
                 PObj_live_CLEAR(b);
-                PObj_get_FLAGS(b) &= ~PObj_custom_GC_FLAG;
             }
             else if (!PObj_on_free_list_TEST(b)) {
                 /* it must be dead */
@@ -359,8 +358,6 @@
 {
     ASSERT_ARGS(mark_special)
 
-    PObj_get_FLAGS(obj) |= PObj_custom_GC_FLAG;
-
     /* clearing the flag is much more expensive then testing */
     if (!PObj_needs_early_gc_TEST(obj))
         PObj_high_priority_gc_CLEAR(obj);