threads::shared 1.22
[p5sagit/p5-mst-13.2.git] / ext / threads / shared / t / stress.t
index 607d25c..b82d81e 100644 (file)
@@ -8,11 +8,11 @@ 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);
     }
     if ($^O eq 'hpux' && $Config{osvers} <= 10.20) {
-        print("1..0 # Skip: Broken under HP-UX 10.20\n");
+        print("1..0 # SKIP Broken under HP-UX 10.20\n");
         exit(0);
     }
 }
@@ -129,4 +129,6 @@ use threads::shared;
     }
 }
 
+exit(0);
+
 # EOF