Branch: refs/heads/yves/fix_accept
  Home:   https://github.com/Perl/perl5
  Commit: bc3e24ef8286d6151eebe3c712905c2d7c9c5bd8
      
https://github.com/Perl/perl5/commit/bc3e24ef8286d6151eebe3c712905c2d7c9c5bd8
  Author: Yves Orton <[email protected]>
  Date:   2022-03-12 (Sat, 12 Mar 2022)

  Changed paths:
    M regcomp.c
    M regexec.c
    M t/re/re_tests

  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.


Reply via email to