use Test::More tests => 5 * (2 + 2 + 1) + 1;
-use Thread::Cleanup;
+BEGIN {
+ defined and diag "Using threads $_" for $threads::VERSION;
+ defined and diag "Using threads::shared $_" for $threads::shared::VERSION;
+}
-diag "Using threads $threads::VERSION";
-diag "Using threads::shared $threads::shared::VERSION";
+use Thread::Cleanup;
my %called : shared;
my %nums : shared;