diff options
Diffstat (limited to 'lib/bytes.t')
| -rw-r--r-- | lib/bytes.t | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/bytes.t b/lib/bytes.t index 05c748c5ac..dda2b87728 100644 --- a/lib/bytes.t +++ b/lib/bytes.t @@ -22,7 +22,11 @@ print ord($c) == 0x100 ? "ok 4\n" : "not ok 4\n"; { use bytes; - print ord($c) == 0xc4 ? "ok 5\n" : "not ok 5\n"; + if (ord('A') == 193) { + print ord($c) == 0x8c ? "ok 5\n" : "not ok 5\n"; + } else { + print ord($c) == 0xc4 ? "ok 5\n" : "not ok 5\n"; + } print length($c) == 2 ? "ok 6\n" : "not ok 6\n"; } |