From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 26 Jun 2001 19:10:19 +0000 (+0000)
Subject: perl_clone_host() needs PERL_IMPLICIT_SYS.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9613994f65a16945d058ed97125397c8b3381e8f;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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;