Re: forwarded you a test result

Message-Id: <92344ED4-9955-11D7-8DFA-000393AE4244@dan.co.jp>

p4raw-id: //depot/perl@19712

diff --git a/ext/Encode/t/Encode.t b/ext/Encode/t/Encode.t
index fc71a91..784ea74 100644 (file)
--- a/ext/Encode/t/Encode.t
+++ b/ext/Encode/t/Encode.t
@@ -3,6 +3,10 @@ BEGIN {
         chdir 't';
         unshift @INC, '../lib';
     }
+    if (ord("A") == 193) {
+        print "1..0 # Skip: EBCDIC\n";
+        exit 0;
+    }
     require Config; import Config;
     if ($Config{'extensions'} !~ /\bEncode\b/) {
       print "1..0 # Skip: Encode was not built\n";