Fix for RT#2353: catch yyparse() exceptions in (?{...})
authorGeorge Greer <perl@greerga.m-l.org>
Sat, 10 Jul 2010 23:18:12 +0000 (19:18 -0400)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 2 Sep 2011 15:42:42 +0000 (08:42 -0700)
commit70e5022ffa62eb53ffab5a50e8f6aeebd205d406
treef22b955b6df07a0d92f748f1c9ed5ba81c7e5dd5
parentbf3505a16c0a7fa3cfea6c5064ac29bbe8dbf4dd
Fix for RT#2353: catch yyparse() exceptions in (?{...})

Ticket is entitled:
"panic: top_env when localizing a lexical variable in qr{(?{...})}"

but a better description would be:
"(?{...}) does not catch yyparse() exceptions in regex compilation"

Changes Perl_sv_compile_2op() to tell doeval() that it must use
S_try_yyparse() to catch any exception that yyparse() may throw.
(cherry picked from commit 634d6919699655c843f8d8c3ea64922d0403c499)
pp_ctl.c