diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-03-31 05:00:07 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-03-31 05:00:07 +0000 |
| commit | a901eef84aae580e80c0351bb32ee5bca0f349f7 (patch) | |
| tree | 90198102999120bcafd2308ece135653dc120dad /t/uni | |
| parent | 0be47ac6ef3026eb6eaaf22fb128d8e2d947e0c7 (diff) | |
| download | perl-a901eef84aae580e80c0351bb32ee5bca0f349f7.tar.gz | |
Some low-hanging fruit for EBCDIC portability
(or for marking as EBCDIC todos)
p4raw-id: //depot/perl@19097
Diffstat (limited to 't/uni')
| -rw-r--r-- | t/uni/write.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/uni/write.t b/t/uni/write.t index 1a7564d3ac..717fcaba54 100644 --- a/t/uni/write.t +++ b/t/uni/write.t @@ -9,6 +9,10 @@ BEGIN { print "1..0 # Skip: PerlIO required\n"; exit 0; } + if (ord("A") == 193) { + print "1..0 # Skip: EBCDIC porting needed\n"; + exit 0; + } } plan tests => 6; |