diff options
| author | Karl Williamson <khw@cpan.org> | 2020-05-29 09:54:37 -0600 |
|---|---|---|
| committer | Sawyer X <xsawyerx@cpan.org> | 2020-06-07 09:50:00 +0300 |
| commit | a192978fac97e3535f3d8ae6857c8156871bb916 (patch) | |
| tree | a6d474de310a81b28da6e12924565ff90a460a9b | |
| parent | 63c69d8307a22a38d9f93571e88625f3261e2618 (diff) | |
| download | perl-a192978fac97e3535f3d8ae6857c8156871bb916.tar.gz | |
APItest/t/utf16_to_utf8.t: Skip on EBCDIC
How this should behave is not well defined.
| -rw-r--r-- | ext/XS-APItest/t/utf16_to_utf8.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ext/XS-APItest/t/utf16_to_utf8.t b/ext/XS-APItest/t/utf16_to_utf8.t index 3bb78d4952..8ebe1e3f24 100644 --- a/ext/XS-APItest/t/utf16_to_utf8.t +++ b/ext/XS-APItest/t/utf16_to_utf8.t @@ -4,6 +4,8 @@ use strict; use Test::More; use Encode; +plan skip_all => 'Unclear how EBCIDC should behave' if ord "A" != 65; + use XS::APItest qw(utf16_to_utf8 utf16_to_utf8_reversed); for my $ord (0, 10, 13, 78, 255, 256, 0xD7FF, 0xE000, 0xFFFD, |