don't longjmp() in pp_goto() (regressive bug from old single-stack

implementation)

p4raw-id: //depot/perl@1941

1 files changed, 0 insertions, 5 deletions

diff --git a/pp_ctl.c b/pp_ctl.c
index 8d43291613..b566738372 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2204,11 +2204,6 @@ PP(pp_goto)
 	PL_do_undump = FALSE;
     }
 
-    if (PL_top_env->je_prev) {
-        PL_restartop = retop;
-        JMPENV_JUMP(3);
-    }
-
     RETURNOP(retop);
 }