The tests need perlio.
Jarkko Hietaniemi [Thu, 18 Apr 2002 13:05:46 +0000 (13:05 +0000)]
p4raw-id: //depot/perl@15993

ext/Encode/t/JP.t
ext/Encode/t/encoding.t

index 89238b5..f904986 100644 (file)
@@ -8,6 +8,10 @@ BEGIN {
       print "1..0 # Skip: Encode was not built\n";
       exit 0;
     }
+    unless (find PerlIO::Layer 'perlio') {
+       print "1..0 # Skip: PerlIO was not built\n";
+       exit 0;
+    }
     if (ord("A") == 193) {
        print "1..0 # Skip: EBCDIC\n";
        exit 0;
index a51bb66..1e69ad9 100644 (file)
@@ -4,6 +4,10 @@ BEGIN {
       print "1..0 # Skip: Encode was not built\n";
       exit 0;
     }
+    unless (find PerlIO::Layer 'perlio') {
+       print "1..0 # Skip: PerlIO was not built\n";
+       exit 0;
+    }
     if (ord("A") == 193) {
        print "1..0 # encoding pragma does not support EBCDIC platforms\n";
        exit(0);