Win32 fix for change #25850. I don't know if this define will ever
Steve Peters [Thu, 27 Oct 2005 01:55:08 +0000 (01:55 +0000)]
be used on Win32, but it does fix the problem at hand.
p4raw-link: @25850 on //depot/perl: ca0c25f67f45e5dccb746852d8545d7ae29ed067

p4raw-id: //depot/perl@25859

win32/perlhost.h

index dd63c76..c8a0406 100644 (file)
@@ -1719,7 +1719,9 @@ win32_start_child(LPVOID arg)
        sv_setiv(sv, -(IV)w32_pseudo_id);
        SvREADONLY_on(sv);
     }
+#ifdef PERL_USES_PL_PIDSTATUS    
     hv_clear(PL_pidstatus);
+#endif    
 
     /* push a zero on the stack (we are the child) */
     {