Revision: 1304
http://vcs.pcre.org/viewvc?view=rev&revision=1304
Author: ph10
Date: 2013-03-29 14:25:40 +0000 (Fri, 29 Mar 2013)
Log Message:
-----------
Move tests that are now Perl-compatible from test 2 to test 1.
Modified Paths:
--------------
code/trunk/testdata/testinput1
code/trunk/testdata/testinput2
code/trunk/testdata/testoutput1
code/trunk/testdata/testoutput2
Modified: code/trunk/testdata/testinput1
===================================================================
--- code/trunk/testdata/testinput1 2013-03-29 09:01:20 UTC (rev 1303)
+++ code/trunk/testdata/testinput1 2013-03-29 14:25:40 UTC (rev 1304)
@@ -5549,4 +5549,31 @@
/(?=b(*THEN)a)bn|bnn/
bnn
+ /^(?!a(*SKIP)b)/
+ ac
+
+ /^(?!a(*SKIP)b)../
+ acd
+
+/(?!a(*SKIP)b)../
+ acd
+
+/^(?(?!a(*SKIP)b))/
+ ac
+
+/^(?!a(*PRUNE)b)../
+ acd
+
+/(?!a(*PRUNE)b)../
+ acd
+
+ /(?!a(*COMMIT)b)ac|cd/
+ ac
+
+/\A.*?(?:a|bc)/
+ ba
+
+/^(A(*THEN)B|C(*THEN)D)/
+ CD
+
/-- End of testinput1 --/
Modified: code/trunk/testdata/testinput2
===================================================================
--- code/trunk/testdata/testinput2 2013-03-29 09:01:20 UTC (rev 1303)
+++ code/trunk/testdata/testinput2 2013-03-29 14:25:40 UTC (rev 1304)
@@ -3762,27 +3762,6 @@
/-- Here are some that Perl treats differently because of the way it handles
backtracking verbs. --/
- /^(?!a(*SKIP)b)/
- ac
-
- /^(?!a(*SKIP)b)../
- acd
-
-/(?!a(*SKIP)b)../
- acd
-
-/^(?(?!a(*SKIP)b))/
- ac
-
-/^(?!a(*PRUNE)b)../
- acd
-
-/(?!a(*PRUNE)b)../
- acd
-
- /(?!a(*COMMIT)b)ac|cd/
- ac
-
/(?!a(*COMMIT)b)ac|ad/
ac
ad
@@ -3797,9 +3776,6 @@
/\A.*?(?:a|b(*THEN)c)/
ba
-/\A.*?(?:a|bc)/
- ba
-
/\A.*?(?:a|b(*THEN)c)++/
ba
@@ -3812,9 +3788,6 @@
/\A.*?(a|b(*THEN)c)/
ba
-/^(A(*THEN)B|C(*THEN)D)/
- CD
-
/^(A(*THEN)B|A(*THEN)D)/
AD
Modified: code/trunk/testdata/testoutput1
===================================================================
--- code/trunk/testdata/testoutput1 2013-03-29 09:01:20 UTC (rev 1303)
+++ code/trunk/testdata/testoutput1 2013-03-29 14:25:40 UTC (rev 1304)
@@ -9116,4 +9116,41 @@
bnn
0: bnn
+ /^(?!a(*SKIP)b)/
+ ac
+ 0:
+
+ /^(?!a(*SKIP)b)../
+ acd
+ 0: ac
+
+/(?!a(*SKIP)b)../
+ acd
+ 0: ac
+
+/^(?(?!a(*SKIP)b))/
+ ac
+ 0:
+
+/^(?!a(*PRUNE)b)../
+ acd
+ 0: ac
+
+/(?!a(*PRUNE)b)../
+ acd
+ 0: ac
+
+ /(?!a(*COMMIT)b)ac|cd/
+ ac
+ 0: ac
+
+/\A.*?(?:a|bc)/
+ ba
+ 0: ba
+
+/^(A(*THEN)B|C(*THEN)D)/
+ CD
+ 0: CD
+ 1: CD
+
/-- End of testinput1 --/
Modified: code/trunk/testdata/testoutput2
===================================================================
--- code/trunk/testdata/testoutput2 2013-03-29 09:01:20 UTC (rev 1303)
+++ code/trunk/testdata/testoutput2 2013-03-29 14:25:40 UTC (rev 1304)
@@ -12518,34 +12518,6 @@
/-- Here are some that Perl treats differently because of the way it handles
backtracking verbs. --/
- /^(?!a(*SKIP)b)/
- ac
- 0:
-
- /^(?!a(*SKIP)b)../
- acd
- 0: ac
-
-/(?!a(*SKIP)b)../
- acd
- 0: ac
-
-/^(?(?!a(*SKIP)b))/
- ac
- 0:
-
-/^(?!a(*PRUNE)b)../
- acd
- 0: ac
-
-/(?!a(*PRUNE)b)../
- acd
- 0: ac
-
- /(?!a(*COMMIT)b)ac|cd/
- ac
- 0: ac
-
/(?!a(*COMMIT)b)ac|ad/
ac
0: ac
@@ -12566,10 +12538,6 @@
ba
0: ba
-/\A.*?(?:a|bc)/
- ba
- 0: ba
-
/\A.*?(?:a|b(*THEN)c)++/
ba
0: ba
@@ -12587,11 +12555,6 @@
0: ba
1: a
-/^(A(*THEN)B|C(*THEN)D)/
- CD
- 0: CD
- 1: CD
-
/^(A(*THEN)B|A(*THEN)D)/
AD
0: AD
