[GH #875] Fix SEGV with empty GC self->work_list in the grey marker

See #875 Do not mark a PMC as grey if the self->work_list is empty. I do not know if that is correct, but it fixed the issue.
parrot · Dec 6, 2012 · ddf6aec · ddf6aec
1 parent 4aee736
commit ddf6aec
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/gc/gc_gms.c b/src/gc/gc_gms.c
@@ -1213,8 +1213,10 @@ gc_gms_mark_pmc_header(PARROT_INTERP, ARGMOD(PMC *pmc))
     /* mark it live. */
     PObj_live_SET(pmc);
 
-    Parrot_pa_remove(interp, self->objects[gen], item->ptr);
+    if (self->work_list) {
-    item->ptr = Parrot_pa_insert(self->work_list, item);
+        Parrot_pa_remove(interp, self->objects[gen], item->ptr);
+        item->ptr = Parrot_pa_insert(self->work_list, item);
+    }
 }
 
 /*