Fix an issue in the P6str repr spotted by sorear++.

Raku · Feb 12, 2011 · 5ed3fad · 5ed3fad
1 parent c8ce669
commit 5ed3fad
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/metamodel/reprs/P6str.c b/src/metamodel/reprs/P6str.c
@@ -127,6 +127,8 @@ static void gc_mark(PARROT_INTERP, PMC *self, PMC *obj) {
     P6strInstance *instance = (P6strInstance *)PMC_data(obj);
     if (!PMC_IS_NULL(instance->common.stable))
         Parrot_gc_mark_PMC_alive(interp, instance->common.stable);
+    if (!STRING_IS_NULL(instance->value))
+        Parrot_gc_mark_STRING_alive(interp, instance->value);
 }
 
 /* This Parrot-specific addition to the API is used to free an object. */