[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