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

mikehh at svn.parrot.org mikehh at svn.parrot.org
Mon Oct 25 14:57:19 UTC 2010


Author: mikehh
Date: Mon Oct 25 14:57:18 2010
New Revision: 49673
URL: https://trac.parrot.org/parrot/changeset/49673

Log:
[generational_gc] add missing ASSERT_ARGS and c function docs

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 14:34:35 2010	(r49672)
+++ branches/generational_gc/src/gc/gc_ms2.c	Mon Oct 25 14:57:18 2010	(r49673)
@@ -2209,9 +2209,22 @@
 
 }
 
+/*
+
+=item C<static void gc_ms2_ensure_flags_in_list(PARROT_INTERP, Linked_List*
+list)>
+
+Make sure the flags are in the list
+
+=cut
+
+*/
+
 static void
 gc_ms2_ensure_flags_in_list(PARROT_INTERP, ARGIN(Linked_List* list))
 {
+    ASSERT_ARGS(gc_ms2_ensure_flags_in_list)
+
     List_Item_Header *tmp = list->first;
     while (tmp) {
         PObj *obj = LLH2Obj_typed(tmp, PObj);
@@ -2221,9 +2234,20 @@
     }
 }
 
+/*
+
+=item C<static void gc_ms2_ensure_flags(PARROT_INTERP)>
+
+debug function to check for flags
+
+=cut
+
+*/
+
 static void
 gc_ms2_ensure_flags(PARROT_INTERP)
 {
+    ASSERT_ARGS(gc_ms2_ensure_flags)
 #ifndef NDEBUG
     MarkSweep_GC     *self = (MarkSweep_GC *)interp->gc_sys->gc_private;
     gc_ms2_ensure_flags_in_list(interp, self->objects[0]);


More information about the parrot-commits mailing list