diff --git a/t/GetCurrentThreadId.t b/t/GetCurrentThreadId.t index ce98f3e..b71372f 100644 --- a/t/GetCurrentThreadId.t +++ b/t/GetCurrentThreadId.t @@ -3,7 +3,7 @@ use Config qw(%Config); use Test; use Win32; -my $fork_emulation = $Config{ccflags} =~ /PERL_IMPLICIT_SYS/; +my $fork_emulation = defined($Config{useithreads}); my $tests = $fork_emulation ? 4 : 2; plan tests => $tests;