PATCH: [perl #130655] Unrecognized UTF-8 char

[perl5.git] / t / lib / warnings / toke

diff --git a/t/lib/warnings/toke b/t/lib/warnings/toke
index 2774f08..8ed6177 100644 (file)
--- a/t/lib/warnings/toke
+++ b/t/lib/warnings/toke
@@ -1634,9 +1634,6 @@ s//\3000/;
 s//"\x{180};;s\221(*$@$`\241\275";/gee;
 s//"s\221\302\302\302\302\302\302\302$@\241\275";/gee;
 EXPECT
-OPTION fatal
-Malformed UTF-8 character: \xc3\x20 (unexpected non-continuation byte 0x20, immediately after start byte 0xc3; need 2 bytes, got 1) in eval "string" at - line 11.
-Malformed UTF-8 character (fatal) at - line 11.
 ########
 # NAME  [perl $130666] Assertion failure
 no warnings "uninitialized";
@@ -1649,3 +1646,8 @@ EXPECT
 OPTION fatal
 syntax error at - line 1, at EOF
 Execution of - aborted due to compilation errors.
+########
+# NAME  [perl #130655]
+use utf8;
+qw∘foo ∞ ♥ bar∘
+EXPECT