Change 18688 by sky@sky-tibook on 2003/02/10 19:54:13
Subject: Re: [perl #20777] [PATCH] goto &subroutine leaks memory
From: Enache Adrian <[EMAIL PROTECTED]>
Date: sun feb 9, 2003 21:10:25 Europe/Stockholm
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/pp_ctl.c#340 edit
Differences ...
==== //depot/perl/pp_ctl.c#340 (text) ====
Index: perl/pp_ctl.c
--- perl/pp_ctl.c#339~18633~ Sun Feb 2 08:48:26 2003
+++ perl/pp_ctl.c Mon Feb 10 11:54:13 2003
@@ -2102,6 +2102,7 @@
}
/* First do some returnish stuff. */
+ FREETMPS;
cxix = dopoptosub(cxstack_ix);
if (cxix < 0)
DIE(aTHX_ "Can't goto subroutine outside a subroutine");
End of Patch.