use Test::More tests => 5 * (2 + 2 + 1) + 1;
+BEGIN {
+ defined and diag "Using threads $_" for $threads::VERSION;
+ defined and diag "Using threads::shared $_" for $threads::shared::VERSION;
+}
+
use Thread::Cleanup;
my %called : shared;
$thr;
} 0 .. 4;
-diag "Using threads $threads::VERSION";
-diag "Using threads::shared $threads::shared::VERSION";
-
$_->detach for @t;
sleep 2;