-use Test::More;
-
-BEGIN {
- delete $ENV{PERL_INDIRECT_PM_DISABLE};
- require indirect;
- if (indirect::I_THREADSAFE()) {
- plan tests => 1;
- defined and diag "Using threads $_" for $threads::VERSION;
- } else {
- plan skip_all => 'This indirect isn\'t thread safe';
- }
-}