1 /-- This set of tests is for UTF-16 and UTF-32 support, and is relevant only to
2 the 16- and 32-bit libraries. --/
31 X\x{11234}\x{512}\x{11234}Z
54 /-- Check maximum character size --/
78 /\x{D55c}\x{ad6d}\x{C5B4}/DZ8
79 \x{D55c}\x{ad6d}\x{C5B4}
81 /\x{65e5}\x{672c}\x{8a9e}/DZ8
82 \x{65e5}\x{672c}\x{8a9e}
94 /-- This one is here not because it's different to Perl, but because the way
95 the captured single-byte is displayed. (In Perl it becomes a character, and you
96 can't tell the difference.) --/
102 /-- This one is here because Perl gives out a grumbly error message (quite
103 correctly, but that messes up comparisons). --/
119 \x{100}\x{100}\x{100}\x{100\x{100}
125 /(\x{100}{0,2}a|x)/8SDZ
127 /(\x{100}{1,2}a|x)/8SDZ
131 /a\x{100}\x{101}*/8DZ
133 /a\x{100}\x{101}+/8DZ
148 /\x{100}abc(xyz(?1))/8DZ
183 /(*CRLF)(*UTF16)(*BSR_UNICODE)a\Rb/I
185 /(*CRLF)(*UTF32)(*BSR_UNICODE)a\Rb/I
210 /\R*A/SI8<bsr_unicode>
248 /-- Check bad offset --/
300 /-- End of testinput18 --/