Revise malformed utf8 test case
Karl [Sun, 28 Dec 2008 14:18:24 +0000 (07:18 -0700)]
t/op/re_tests

index f515605..9d353e8 100644 (file)
@@ -1361,4 +1361,7 @@ foo(\h)bar        foo\tbar        y       $1      \t
 # [perl #60344] Regex lookbehind failure after an (if)then|else in perl 5.10
 /\A(?(?=db2)db2|\D+)(?<!processed)\.csv\z/xms  sql_processed.csv       n       -       -
 /\N{U+0100}/   \x{100} y       $&      \x{100} # Bug #59328
-[\s][\S]       \x{a0}\x{a0}    nT      -       -       # TODO Unicode complements should not match same character
\ No newline at end of file
+[\s][\S]       \x{a0}\x{a0}    nT      -       -       # TODO Unicode complements should not match same character
+
+# was generating malformed utf8
+'[\x{100}\xff]'i       \x{ff}  y       $&      \x{ff}