In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/27fe105ac377b5c29a778e3ff9a9f13711204da2?hp=4aaafc03904bf62df69dd883497e05993a87e6c5>
- Log ----------------------------------------------------------------- commit 27fe105ac377b5c29a778e3ff9a9f13711204da2 Author: Yves Orton <[email protected]> Date: Sun Apr 3 10:50:22 2016 +0200 restore incorrectly deleted note ----------------------------------------------------------------------- Summary of changes: regexec.c | 1 + 1 file changed, 1 insertion(+) diff --git a/regexec.c b/regexec.c index 29429b2..0c549df 100644 --- a/regexec.c +++ b/regexec.c @@ -6883,6 +6883,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, char *startpos, regnode *prog) } case EVAL_AB: /* cleanup after a successful (??{A})B */ + /* note: this is called twice; first after popping B, then A */ DEBUG_STACK_r({ Perl_re_exec_indentf( aTHX_ "EVAL_AB cur_eval=%p prev_eval=%p\n", depth, cur_eval, ST.prev_eval); -- Perl5 Master Repository
