Tests for #8329 and #8330.
Jarkko Hietaniemi [Fri, 5 Jan 2001 15:03:07 +0000 (15:03 +0000)]
p4raw-id: //depot/perl@8331

t/op/bop.t

index 3fad2fd..622d169 100755 (executable)
@@ -9,7 +9,7 @@ BEGIN {
     @INC = '../lib';
 }
 
-print "1..40\n";
+print "1..42\n";
 
 # numerics
 print ((0xdead & 0xbeef) == 0x9ead ? "ok 1\n" : "not ok 1\n");
@@ -159,3 +159,7 @@ if (@not40) {
     print "not ";
 }
 print "ok 40\n";
+
+# More variations on 19 and 22.
+print "ok \xFF\x{FF}\n" & "ok 41\n";
+print "ok \x{FF}\xFF\n" & "ok 42\n";