Tweak XSLoader.t.
Rafael Garcia-Suarez [Sat, 30 Aug 2003 15:20:48 +0000 (15:20 +0000)]
XSLoader is supposed to work even for extensions that
are statically linked. So only check that the extension we
test for is actually available. (This test is not supposed
to be run by miniperl.)

p4raw-id: //depot/perl@20952

ext/DynaLoader/t/XSLoader.t

index 6eb26af..073a6fd 100644 (file)
@@ -1,13 +1,8 @@
-#!/usr/bin/perl -w
+#!./perl -w
 
 BEGIN {
-    chdir 't';
+    chdir 't' if -d 't';
     @INC = '../lib';
-    eval 'use Fcntl';
-    if ($@ =~ /dynamic loading not available/) {
-        print "1..0 # Skip: no dynamic loading\n";
-       exit;
-    }
     require Config; import Config;
     if (($Config{'extensions'} !~ /\bSDBM_File\b/) && ($^O ne 'VMS')){
        print "1..0 # Skip: no SDBM_File\n";