perl_clone_host() needs PERL_IMPLICIT_SYS.

p4raw-id: //depot/perl@10970

diff --git a/win32/perllib.c b/win32/perllib.c
index 36b19a3..fcf1bec 100644 (file)
--- a/win32/perllib.c
+++ b/win32/perllib.c
@@ -397,7 +397,7 @@ DllMain(HANDLE hModule,             /* DLL module handle */
     return TRUE;
 }
 
-#ifdef USE_ITHREADS
+#if defined(USE_ITHREADS) && defined(PERL_IMPLICIT_SYS)
 EXTERN_C PerlInterpreter *
 perl_clone_host(PerlInterpreter* proto_perl, UV flags) {
     dTHXo;