[svn:parrot] r41793 - trunk/src/call

[bacek at svn.parrot.org]

Author: bacek
Date: Sat Oct 10 11:35:38 2009
New Revision: 41793
URL: https://trac.parrot.org/parrot/changeset/41793

Log:
[cage] Initialise Context.current_sub in init_context.

Modified:
   trunk/src/call/context.c

Modified: trunk/src/call/context.c
==============================================================================
--- trunk/src/call/context.c	Sat Oct 10 10:56:10 2009	(r41792)
+++ trunk/src/call/context.c	Sat Oct 10 11:35:38 2009	(r41793)
@@ -1149,6 +1149,7 @@
                            ? NULL
                            : get_context_struct_fast(interp, pmcold);
 
+    ctx->current_sub       = NULL;
     ctx->current_results   = NULL;
     ctx->results_signature = NULL;
     ctx->lex_pad           = PMCNULL;