[svn:parrot] r44946 - branches/pcc_hackathon_6Mar10/src/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Mon Mar 15 19:55:59 2010
New Revision: 44946
URL: https://trac.parrot.org/parrot/changeset/44946

Log:
Propogate ctx.current_signature into callee context in Coro.invoke

Modified:
   branches/pcc_hackathon_6Mar10/src/pmc/coroutine.pmc

Modified: branches/pcc_hackathon_6Mar10/src/pmc/coroutine.pmc
==============================================================================
--- branches/pcc_hackathon_6Mar10/src/pmc/coroutine.pmc	Mon Mar 15 19:46:02 2010	(r44945)
+++ branches/pcc_hackathon_6Mar10/src/pmc/coroutine.pmc	Mon Mar 15 19:55:59 2010	(r44946)
@@ -140,6 +140,8 @@
         opcode_t          *dest;
         PackFile_ByteCode *wanted_seg;
         opcode_t * const   next_op = (opcode_t *)next;
+        PMC const *        signature = Parrot_pcc_get_signature(interp,
+                                            CURRENT_CONTEXT(interp));
 
         if (Interp_trace_TEST(INTERP, PARROT_TRACE_SUB_CALL_FLAG))
             print_sub_name(INTERP, SELF);
@@ -267,6 +269,8 @@
             CURRENT_CONTEXT(INTERP) = to_ctx;
         }
 
+        Parrot_pcc_set_signature(interp, CURRENT_CONTEXT(interp), signature);
+
         /* toggle address */
         GET_ATTR_address(INTERP, SELF, dest);
         SET_ATTR_address(INTERP, SELF, (opcode_t *)next);