Skip test if perl configured without threads::shared
Nicholas Clark [Fri, 18 Jun 2004 13:11:31 +0000 (13:11 +0000)]
p4raw-id: //depot/perl@22954

ext/threads/shared/t/disabled.t

index 067cf25..1add2b8 100644 (file)
@@ -5,6 +5,11 @@
 BEGIN {
     chdir 't';
     @INC = '../lib';
+    require Config;
+    if (($Config::Config{'extensions'} !~ /\bthreads::shared\b/) ){
+        print "1..0 # Skip -- Perl configured without threads::shared module\n";
+        exit 0;
+    }
 }
 
 # Can't use Test::More, it turns threads on.