[svn:parrot] r40875 - branches/context_pmc3/src/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Sun Aug 30 13:01:35 2009
New Revision: 40875
URL: https://trac.parrot.org/parrot/changeset/40875

Log:
[cage] Fix codetest failure in Sub PMC.

Modified:
   branches/context_pmc3/src/pmc/sub.pmc

Modified: branches/context_pmc3/src/pmc/sub.pmc
==============================================================================
--- branches/context_pmc3/src/pmc/sub.pmc	Sun Aug 30 13:01:14 2009	(r40874)
+++ branches/context_pmc3/src/pmc/sub.pmc	Sun Aug 30 13:01:35 2009	(r40875)
@@ -325,7 +325,11 @@
         else {
             /* autoclose */
             PMC *c;
-            for (c = context; PMC_IS_NULL(Parrot_pcc_get_outer_ctx(interp, c)); c = Parrot_pcc_get_outer_ctx(interp, c)) {
+            for (
+                    c = context;
+                    PMC_IS_NULL(Parrot_pcc_get_outer_ctx(interp, c));
+                    c = Parrot_pcc_get_outer_ctx(interp, c)
+            ) {
 
                 PMC         *outer_pmc;
                 Parrot_Sub_attributes *current_sub, *outer_sub;
@@ -374,8 +378,6 @@
                 PObj_get_FLAGS(ccont) &= ~SUB_FLAG_TAILCALL;
                 Parrot_pcc_set_caller_ctx(interp, context,
                         Parrot_pcc_get_caller_ctx(interp, caller_ctx));
-
-                //Parrot_free_context(INTERP, caller_ctx, 1);
             }
         }