From: Dave Mitchell <davem@fdisolutions.com>
Date: Mon, 30 May 2005 23:37:15 +0000 (+0000)
Subject: add pointer to email explaining why eval {goto &foo} is banned
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=564abe232de07cdf98620f3e8fe522b3fed4c37c;p=p5sagit%2Fp5-mst-13.2.git

add pointer to email explaining why eval {goto &foo} is banned

p4raw-id: //depot/perl@24642
---

diff --git a/pp_ctl.c b/pp_ctl.c
index 3a6c64f..fbcb1c4 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2298,6 +2298,7 @@ PP(pp_goto)
 		dounwind(cxix);
 	    TOPBLOCK(cx);
 	    SPAGAIN;
+	    /* ban goto in eval: see <20050521150056.GC20213@iabyn.com> */
 	    if (CxTYPE(cx) == CXt_EVAL) {
 		if (CxREALEVAL(cx))
 		    DIE(aTHX_ "Can't goto subroutine from an eval-string");