diff options
author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-28 08:09:53 +0000 |
---|---|---|
committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2002-01-28 08:09:53 +0000 |
commit | 38506751601bfdd51b90f9e878ed0517263f4fd7 (patch) | |
tree | 2eef646d4f9939729b398044920ecfb5f20ba820 /ext | |
parent | 5f64702c2754f26298640cbbe1e1860bf13c63f2 (diff) | |
download | perl-38506751601bfdd51b90f9e878ed0517263f4fd7.tar.gz |
1st attempt at skipping broke threads case.
p4raw-id: //depot/perlio@14462
Diffstat (limited to 'ext')
-rw-r--r-- | ext/threads/shared/t/0nothread.t | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/ext/threads/shared/t/0nothread.t b/ext/threads/shared/t/0nothread.t index 0ce4e6eed1..af83a41372 100644 --- a/ext/threads/shared/t/0nothread.t +++ b/ext/threads/shared/t/0nothread.t @@ -1,11 +1,13 @@ use strict; -use Test::More (); use Config; -if ($Config{'useithreads'}) { - Test::More->import( tests => 53 ); -} -else { - Test::More->import(skip_all => "no useithreads"); +BEGIN { + require Test::More; + if ($Config{'useithreads'}) { + Test::More->import( tests => 53 ); + } + else { + Test::More->import(skip_all => "no useithreads"); + } } |