Write barrier proper Sub PMC.

parrot · Feb 3, 2011 · 079f6e6 · 079f6e6
1 parent 3b12abc
commit 079f6e6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/sub.c b/src/sub.c
@@ -443,7 +443,7 @@ Parrot_sub_capture_lex(PARROT_INTERP, ARGMOD(PMC *sub_pmc))
         return;
 
     /* set the sub's outer context to the current context */
-    Parrot_gc_write_barrier(interp, Parrot_pcc_get_sub(interp, ctx));
+    Parrot_gc_write_barrier(interp, sub_pmc);
     sub->outer_ctx = ctx;
 }