X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2Fthreads%2Fshared%2Ft%2Fobject.t;h=394ed6a58192ab7ae936d1f7a4cac352c19280f7;hb=6c791b1568bda9f592749d4c80a9b5eb86201e25;hp=5c5a55e57e0b568f88b7bdc28bae6eadff609e1d;hpb=8381071f750dc80d2b1c239344ce1b5eb5c29628;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/threads/shared/t/object.t b/ext/threads/shared/t/object.t index 5c5a55e..394ed6a 100644 --- a/ext/threads/shared/t/object.t +++ b/ext/threads/shared/t/object.t @@ -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 ($] < 5.010) { - print("1..0 # Skip: Needs Perl 5.10.0 or later\n"); + print("1..0 # SKIP Needs Perl 5.10.0 or later\n"); exit(0); } } @@ -178,4 +178,6 @@ threads->create( sub { ok($$obj == 2, "Main: New object ID $$obj # TODO - should be 2"); +exit(0); + # EOF