--- embedaddon/pcre/testdata/testinput7	2012/02/21 23:50:25	1.1.1.2
+++ embedaddon/pcre/testdata/testinput7	2012/10/09 09:19:18	1.1.1.3
@@ -558,4 +558,68 @@ of case for anything other than the ASCII letters. --/
 
 /(?<=ab\Cde)X/8
 
+/\X/
+    a\P
+    a\P\P
+
+/\Xa/
+    aa\P
+    aa\P\P
+
+/\X{2}/
+    aa\P
+    aa\P\P
+
+/\X+a/
+    a\P
+    aa\P
+    aa\P\P
+
+/\X+?a/
+    a\P
+    ab\P
+    aa\P
+    aa\P\P
+    aba\P
+    
+/-- These Unicode 6.1.0 scripts are not known to Perl. --/ 
+
+/\p{Chakma}\d/8W
+    \x{11100}\x{1113c}
+
+/\p{Takri}\d/8W
+    \x{11680}\x{116c0}
+
+/^\X/8
+    A\P
+    A\P\P 
+    A\x{300}\x{301}\P
+    A\x{300}\x{301}\P\P  
+    A\x{301}\P
+    A\x{301}\P\P  
+    
+/^\X{2,3}/8
+    A\P
+    A\P\P 
+    AA\P
+    AA\P\P  
+    A\x{300}\x{301}\P
+    A\x{300}\x{301}\P\P  
+    A\x{300}\x{301}A\x{300}\x{301}\P
+    A\x{300}\x{301}A\x{300}\x{301}\P\P  
+
+/^\X{2}/8
+    AA\P
+    AA\P\P  
+    A\x{300}\x{301}A\x{300}\x{301}\P
+    A\x{300}\x{301}A\x{300}\x{301}\P\P  
+    
+/^\X+/8
+    AA\P
+    AA\P\P  
+
+/^\X+?Z/8
+    AA\P
+    AA\P\P 
+
 /-- End of testinput7 --/