1 /-- This set of tests is for UTF-8 support, and is relevant only to the 8-bit
78 \xfd\x7f\x80\x80\x80\x80
79 \xfd\x80\x7f\x80\x80\x80
80 \xfd\x80\x80\x7f\x80\x80
81 \xfd\x80\x80\x80\x7f\x80
82 \xfd\x80\x80\x80\x80\x7f
88 \xfc\x80\x80\x80\x80\x8f
96 \xfd\x80\x80\x80\x80\x80
114 \P\P\xfd\x80\x80\x80\x80
122 \xfc\x83\x80\x80\x80\x80
123 \xfe\x80\x80\x80\x80\x80
124 \xff\x80\x80\x80\x80\x80
132 \xfc\x84\x80\x80\x80\x80
133 \xfd\x83\x80\x80\x80\x80
134 \?\xf8\x88\x80\x80\x80
135 \?\xf9\x87\x80\x80\x80
136 \?\xfc\x84\x80\x80\x80\x80
137 \?\xfd\x83\x80\x80\x80\x80
225 /\x{D55c}\x{ad6d}\x{C5B4}/DZ8
226 \x{D55c}\x{ad6d}\x{C5B4}
228 /\x{65e5}\x{672c}\x{8a9e}/DZ8
229 \x{65e5}\x{672c}\x{8a9e}
241 /-- This one is here not because it's different to Perl, but because the way
242 the captured single-byte is displayed. (In Perl it becomes a character, and you
243 can't tell the difference.) --/
249 /-- This one is here because Perl gives out a grumbly error message (quite
250 correctly, but that messes up comparisons). --/
266 \x{100}\x{100}\x{100}\x{100\x{100}
272 /(\x{100}{0,2}a|x)/8SDZ
274 /(\x{100}{1,2}a|x)/8SDZ
278 /a\x{100}\x{101}*/8DZ
280 /a\x{100}\x{101}+/8DZ
295 /\x{100}abc(xyz(?1))/8DZ
310 /-- This tests the stricter UTF-8 check according to RFC 3629. --/
313 \x{0}\x{d7ff}\x{e000}\x{10ffff}
330 /(*CRLF)(*UTF)(*BSR_UNICODE)a\Rb/I
430 /-- End of testinput15 --/