diff options
| author | Karl Williamson <khw@cpan.org> | 2022-07-06 21:13:02 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2022-07-06 21:14:30 -0600 |
| commit | b58cce2db66370e792e026280d09baf9caba65b6 (patch) | |
| tree | 5e809142dd44a3bdd88e247794cbd82ed3e2e39e /t/re | |
| parent | 966f9a3ba28de67807c4b44b8af6f012bb216fb9 (diff) | |
| download | perl-b58cce2db66370e792e026280d09baf9caba65b6.tar.gz | |
Add test for GH #8369
This fixes GH #19781
Diffstat (limited to 't/re')
| -rw-r--r-- | t/re/re_tests | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/re/re_tests b/t/re/re_tests index 3a29d54c7d..44a3164008 100644 --- a/t/re/re_tests +++ b/t/re/re_tests @@ -2109,6 +2109,7 @@ AB\s+\x{100} AB \x{100}X y - - / (A (*ACCEPT) | BC){2} D{0,4}/x A y $1 A - # ACCEPT optimizer check \p{nv=-0} \x{660} y $& \x{660} +(?:a|xx){0,4}?b aaaaab y $& aaaab # Bug is GH #8369; test is GH #19781 # Keep these lines at the end of the file # pat string y/n/etc expr expected-expr skip-reason comment |