[svn:parrot] r41896 - branches/pcc_reapply/src/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Sat Oct 17 13:23:04 2009
New Revision: 41896
URL: https://trac.parrot.org/parrot/changeset/41896

Log:
Build result signature in Continuation.invoke.

Modified:
   branches/pcc_reapply/src/pmc/continuation.pmc

Modified: branches/pcc_reapply/src/pmc/continuation.pmc
==============================================================================
--- branches/pcc_reapply/src/pmc/continuation.pmc	Sat Oct 17 12:38:15 2009	(r41895)
+++ branches/pcc_reapply/src/pmc/continuation.pmc	Sat Oct 17 13:23:04 2009	(r41896)
@@ -250,6 +250,12 @@
 
         if (!PMC_IS_NULL(from_obj)) {
             PMC *raw_sig  = VTABLE_get_attr_str(interp, from_obj, CONST_STRING(interp, "arg_flags"));
+
+            /* Build results signature for continuation */
+            if (*pc == PARROT_OP_get_results_pc)
+                call_obj = Parrot_pcc_build_sig_object_returns_from_op(INTERP, call_obj,
+                    Parrot_pcc_get_pmc_constant(INTERP, to_ctx, pc[1]), pc);
+
             Parrot_pcc_fill_returns_from_continuation(interp, call_obj, raw_sig, from_obj);
         }