The test doesn't work that well when -Uusedl.

Some of the tests could be salvaged even then I guess.

p4raw-id: //depot/perl@19183

diff --git a/lib/ExtUtils/t/Constant.t b/lib/ExtUtils/t/Constant.t
index 4e5819d..af63767 100644 (file)
--- a/lib/ExtUtils/t/Constant.t
+++ b/lib/ExtUtils/t/Constant.t
@@ -5,13 +5,17 @@ BEGIN {
         chdir 't' if -d 't';
         @INC = '../lib';
     }
+    use Config;
+    unless ($Config{usedl}) {
+       print "1..0 # no usedl, skipping\n";
+       exit 0;
+    }
 }
 
 # use warnings;
 use strict;
 use ExtUtils::MakeMaker;
 use ExtUtils::Constant qw (constant_types C_constant XS_constant autoload);
-use Config;
 use File::Spec;
 use Cwd;