1 files changed, 8 insertions, 0 deletions
diff --git a/t/lib/warnings/op b/t/lib/warnings/op
index 8f579201eb..f2270dc01a 100644
--- a/t/lib/warnings/op
+++ b/t/lib/warnings/op
@@ -991,6 +991,14 @@ join /---/, 'x', 'y', 'z';
 EXPECT
 /---/ should probably be written as "---" at - line 3.
 ########
+# op.c
+use utf8;
+use open qw( :utf8 :std );
+use warnings 'syntax' ;
+join /～～～/, 'x', 'y', 'z';
+EXPECT
+/～～～/ should probably be written as "～～～" at - line 5.
+########
 # op.c [Perl_peep]
 use warnings 'prototype' ;
 fred() ;