Branch: refs/heads/yves/fix_accept
Home: https://github.com/Perl/perl5
Commit: fbe9bed54130a701190e1bf4863406594209e50c
https://github.com/Perl/perl5/commit/fbe9bed54130a701190e1bf4863406594209e50c
Author: Yves Orton <[email protected]>
Date: 2022-03-11 (Fri, 11 Mar 2022)
Changed paths:
M regcomp.c
M regexec.c
Log Message:
-----------
regexp.c, regcomp.c: Fix up ACCEPT in a variety of ways. (WIP)
Sample code showing the bug. Removing the '+' works, but with the plus
it goes horribly wrong.
./perl -Ilib -Mre=debug -e'CORE::say "ABDE" =~ /(A (A|B(*ACCEPT)|C)+ D)(E)/x ?
"yes: <$1-$2>" : "no";'
Needs tests. Pushing this purely for Karl to review.