[svn:parrot] r36604 - in trunk: docs include/parrot src

cotto at svn.parrot.org cotto at svn.parrot.org
Wed Feb 11 23:21:27 UTC 2009


Author: cotto
Date: Wed Feb 11 23:21:26 2009
New Revision: 36604
URL: https://trac.parrot.org/parrot/changeset/36604

Log:
[gc] change DOD_flags to gc_flags

Modified:
   trunk/docs/memory_internals.pod
   trunk/include/parrot/pobj.h
   trunk/src/pmc.c

Modified: trunk/docs/memory_internals.pod
==============================================================================
--- trunk/docs/memory_internals.pod	Wed Feb 11 23:18:49 2009	(r36603)
+++ trunk/docs/memory_internals.pod	Wed Feb 11 23:21:26 2009	(r36604)
@@ -143,8 +143,8 @@
 C<ARENA_DOD_FLAGS> to 1.
 
 F<pobj.h> provides macros to facilitate referencing individual object flags:
-C<DOD_flag_SET>, C<DOD_flag_CLEAR> and C<DOD_flag_TEST>. They make up a
-portable way of manipulating the DOD-relevant object flags.
+C<gc_flag_SET>, C<gc_flag_CLEAR> and C<gc_flag_TEST>. They make up a portable
+way of manipulating the GC-relevant object flags.
 
 =head1 Variable sized items
 

Modified: trunk/include/parrot/pobj.h
==============================================================================
--- trunk/include/parrot/pobj.h	Wed Feb 11 23:18:49 2009	(r36603)
+++ trunk/include/parrot/pobj.h	Wed Feb 11 23:21:26 2009	(r36604)
@@ -290,9 +290,9 @@
 #  define PObj_on_free_list_FLAG      b_PObj_on_free_list_FLAG
 #  define PObj_is_special_PMC_FLAG    b_PObj_is_special_PMC_FLAG
 
-#  define DOD_flag_TEST(flag, o)      PObj_flag_TEST(flag, o)
-#  define DOD_flag_SET(flag, o)       PObj_flag_SET(flag, o)
-#  define DOD_flag_CLEAR(flag, o)     PObj_flag_CLEAR(flag, o)
+#  define gc_flag_TEST(flag, o)      PObj_flag_TEST(flag, o)
+#  define gc_flag_SET(flag, o)       PObj_flag_SET(flag, o)
+#  define gc_flag_CLEAR(flag, o)     PObj_flag_CLEAR(flag, o)
 
 #define PObj_get_FLAGS(o) ((o)->flags)
 
@@ -327,13 +327,13 @@
 #define PObj_report_CLEAR(o) PObj_flag_CLEAR(report, o)
 
 
-#define PObj_on_free_list_TEST(o) DOD_flag_TEST(on_free_list, o)
-#define PObj_on_free_list_SET(o) DOD_flag_SET(on_free_list, o)
-#define PObj_on_free_list_CLEAR(o) DOD_flag_CLEAR(on_free_list, o)
-
-#define PObj_live_TEST(o) DOD_flag_TEST(live, o)
-#define PObj_live_SET(o) DOD_flag_SET(live, o)
-#define PObj_live_CLEAR(o) DOD_flag_CLEAR(live, 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)
+
+#define PObj_live_TEST(o) gc_flag_TEST(live, o)
+#define PObj_live_SET(o) gc_flag_SET(live, o)
+#define PObj_live_CLEAR(o) gc_flag_CLEAR(live, o)
 
 #define PObj_is_string_TEST(o) PObj_flag_TEST(is_string, o)
 #define PObj_is_string_SET(o) PObj_flag_SET(is_string, o)
@@ -346,7 +346,7 @@
 
 #define PObj_special_SET(flag, o) do { \
     PObj_flag_SET(flag, o); \
-    DOD_flag_SET(is_special_PMC, o); \
+    gc_flag_SET(is_special_PMC, o); \
 } while (0)
 
 #define PObj_special_CLEAR(flag, o) do { \
@@ -356,13 +356,13 @@
                  PObj_custom_mark_FLAG | \
                  PObj_is_PMC_EXT_FLAG | \
                  PObj_needs_early_gc_FLAG))) \
-        DOD_flag_SET(is_special_PMC, o); \
+        gc_flag_SET(is_special_PMC, o); \
     else \
-        DOD_flag_CLEAR(is_special_PMC, o); \
+        gc_flag_CLEAR(is_special_PMC, o); \
 } while (0)
 
-#define PObj_is_special_PMC_TEST(o) DOD_flag_TEST(is_special_PMC, o)
-#define PObj_is_special_PMC_SET(o) DOD_flag_SET(is_special_PMC, o)
+#define PObj_is_special_PMC_TEST(o) gc_flag_TEST(is_special_PMC, o)
+#define PObj_is_special_PMC_SET(o) gc_flag_SET(is_special_PMC, o)
 
 #define PObj_needs_early_gc_TEST(o) PObj_flag_TEST(needs_early_gc, o)
 #define PObj_needs_early_gc_SET(o) PObj_special_SET(needs_early_gc, o)

Modified: trunk/src/pmc.c
==============================================================================
--- trunk/src/pmc.c	Wed Feb 11 23:18:49 2009	(r36603)
+++ trunk/src/pmc.c	Wed Feb 11 23:21:26 2009	(r36604)
@@ -666,7 +666,7 @@
         if (PObj_is_PMC_EXT_TEST(_class))
             Parrot_gc_free_pmc_ext(interp, _class);
 
-        DOD_flag_CLEAR(is_special_PMC, _class);
+        gc_flag_CLEAR(is_special_PMC, _class);
 
         PMC_pmc_val(_class)    = (PMC  *)0xdeadbeef;
         PMC_struct_val(_class) = (void *)0xdeadbeef;


More information about the parrot-commits mailing list