-#!perl -T
+#!perl
use strict;
use warnings;
-use lib 't/lib';
-use Variable::Magic::TestThreads;
-
-use Test::More 'no_plan';
-
use Variable::Magic qw<
wizard cast dispell getdata
VMG_OP_INFO_NAME VMG_OP_INFO_OBJECT
>;
+use lib 't/lib';
+use VPIT::TestHelpers (
+ threads => [ 'Variable::Magic' => 'Variable::Magic::VMG_THREADSAFE()' ],
+);
+
+use Test::Leaner 'no_plan';
+
my $destroyed : shared = 0;
my $c : shared = 0;