diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-09-22 20:39:30 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-09-22 20:39:30 +0000 |
| commit | 44d268c35b0990eda9f6bc86f3f06731b6aec174 (patch) | |
| tree | 6b413b6c33da09d3aecc51cb3aba0c9b97d28855 /t | |
| parent | f5bb2f49891625105d14945994319300062baeff (diff) | |
| download | perl-44d268c35b0990eda9f6bc86f3f06731b6aec174.tar.gz | |
Change 30638 to 5.8.x inadvertently introduced (at lest) two
regressions into the regexp engine. Add tests for the constructions
that regressed, to prevent any future change falling foul of the same
problem.
p4raw-id: //depot/perl@34400
Diffstat (limited to 't')
| -rw-r--r-- | t/op/re_tests | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/t/op/re_tests b/t/op/re_tests index ddeb55cdbb..2b74175dd2 100644 --- a/t/op/re_tests +++ b/t/op/re_tests @@ -1351,3 +1351,9 @@ foo(\h)bar foo\tbar y $1 \t /\d+$ \n/ix >10\n y $& 10 />\d\d$ \n/ix >10\n y $& >10 />\d+$ \n/x >10\n y $& >10 + +# Two regressions in 5.8.x (only) introduced by change 30638 +# Simplification of the test failure in XML::LibXML::Simple: +/^\s*i.*?o\s*$/s io\n io y - - +# As reported in #59168 by Father Chrysostomos: +/(.*?)a(?!(a+)b\2c)/ baaabaac y $&-$1 baa-ba |