--- Coro/Coro/State.xs	2007/10/06 00:08:04	1.194
+++ Coro/Coro/State.xs	2007/10/06 00:35:41	1.195
@@ -610,6 +610,7 @@
   PL_in_eval    = EVAL_NULL;
   PL_comppad    = 0;
   PL_curpm      = 0;
+  PL_curpad     = 1;
   PL_localizing = 0;
   PL_dirty      = 0;
   PL_restartop  = 0;
@@ -621,8 +622,6 @@
   PL_rs              = newSVsv (GvSV (irsgv));
   PL_defoutgv        = SvREFCNT_inc (stdoutgv);
 
-  ENTER; /* necessary e.g. for dounwind */
-
   {
     dSP;
     LOGOP myop;
@@ -638,6 +637,8 @@
     PL_op = PL_ppaddr[OP_ENTERSUB](aTHX);
     SPAGAIN;
   }
+
+  ENTER; /* necessary e.g. for dounwind and to balance the xsub-entersub */
 }
 
 static void