t/44-threads-too-late.t

   1 #!perl -T
   2
   3 use strict;
   4 use warnings;
   5
   6 BEGIN { $ENV{PERL_FORCE_TEST_THREADS} = 1 }
   7
   8 use Test::More tests => 1;
   9
  10 local $@;
  11 eval 'use VPIT::TestHelpers "threads";';
  12 like $@, qr/was loaded too soon/, 'cannot use the threads feature after Test::More was loaded';