perl_clone_host() n/a when PERL_IMPLICIT_SYS isn't
authorGurusamy Sarathy <gsar@cpan.org>
Wed, 8 May 2002 01:34:45 +0000 (01:34 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Wed, 8 May 2002 01:34:45 +0000 (01:34 +0000)
p4raw-id: //depot/perl@16463

makedef.pl

index ffe69b3028253546bd6416ca247add9e117d34de..e09f2bcc06a5342646fafe13be8daa9278cda2dd 100644 (file)
@@ -116,7 +116,7 @@ if ($PLATFORM =~ /^win(?:32|ce)$/) {
        output_symbol("perl_get_host_info");
        output_symbol("perl_alloc_override");
     }
-    if ($define{USE_ITHREADS}) {
+    if ($define{USE_ITHREADS} and $define{PERL_IMPLICIT_SYS}) {
        output_symbol("perl_clone_host");
     }
 }