Change 35065 by [EMAIL PROTECTED] on 2008/12/09 20:01:26

        Integrate:
        [ 34202]
        Subject: RE: [perl #35877] Strange regex failure?
        From: Bram <[EMAIL PROTECTED]>
        Date: Sun, 03 Aug 2008 16:35:29 +0200
        Message-ID: <[EMAIL PROTECTED]>
        
        (Adds tests for perl #35877, which was fixed by change 29441)

Affected files ...

... //depot/maint-5.10/perl/t/op/re_tests#8 integrate

Differences ...

==== //depot/maint-5.10/perl/t/op/re_tests#8 (text) ====
Index: perl/t/op/re_tests
--- perl/t/op/re_tests#7~35020~ 2008-12-05 13:18:07.000000000 -0800
+++ perl/t/op/re_tests  2008-12-09 12:01:26.000000000 -0800
@@ -1344,10 +1344,13 @@
 .*?(?:(\w)|(\w))x      abx     y       $1-$2   b-
 
 0{50}  000000000000000000000000000000000000000000000000000     y       -       
-
-# Bug #56690
-^a?(?=b)b      ab      B       $&      ab
-^a*(?=b)b      ab      B       $&      ab
-
+^a?(?=b)b      ab      B       $&      ab      # Bug #56690
+^a*(?=b)b      ab      B       $&      ab      # Bug #56690
+/>\d+$ \n/ix   >10\n   y       $&      >10
+/>\d+$ \n/ix   >1\n    y       $&      >1
+/\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:
End of Patch.

Reply via email to