threads::shared 1.22
[p5sagit/p5-mst-13.2.git] / ext / threads / shared / t / waithires.t
index 22e9c73..b2e9146 100644 (file)
@@ -8,7 +8,7 @@ BEGIN {
     }
     use Config;
     if (! $Config{'useithreads'}) {
-        print("1..0 # Skip: Perl not compiled with 'useithreads'\n");
+        print("1..0 # SKIP Perl not compiled with 'useithreads'\n");
         exit(0);
     }
     eval {
@@ -16,7 +16,7 @@ BEGIN {
         Time::HiRes->import('time');
     };
     if ($@) {
-        print("1..0 # Skip: Time::HiRes not available.\n");
+        print("1..0 # SKIP Time::HiRes not available.\n");
         exit(0);
     }
 }
@@ -318,4 +318,6 @@ SYNCH_REFS: {
 
 } # -- SYNCH_REFS block
 
+exit(0);
+
 # EOF