diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-01-05 15:03:07 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-01-05 15:03:07 +0000 |
| commit | 299b089d70d012ab45fb81fc8423448962619a13 (patch) | |
| tree | 8d5014d788c03dad3f907048f8b7651e7124b95e /t/op/bop.t | |
| parent | 301d3d20746da77e204598157e568e8c22a220b1 (diff) | |
| download | perl-299b089d70d012ab45fb81fc8423448962619a13.tar.gz | |
Tests for #8329 and #8330.
p4raw-id: //depot/perl@8331
Diffstat (limited to 't/op/bop.t')
| -rwxr-xr-x | t/op/bop.t | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/t/op/bop.t b/t/op/bop.t index 3fad2fd172..622d1698fe 100755 --- a/t/op/bop.t +++ b/t/op/bop.t @@ -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"; |