diff options
| author | Steve Peters <steve@fisharerojo.org> | 2005-10-27 01:55:08 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2005-10-27 01:55:08 +0000 |
| commit | 6a04c2460440e11ec69d2ce463d6d46a2d5d7155 (patch) | |
| tree | a3315ce60eb09ee89028da9015ee5b7ed26c95b5 /win32 | |
| parent | 18a3d61e13d6d303e42e679634ab36e632891177 (diff) | |
| download | perl-6a04c2460440e11ec69d2ce463d6d46a2d5d7155.tar.gz | |
Win32 fix for change #25850. I don't know if this define will ever
be used on Win32, but it does fix the problem at hand.
p4raw-link: @25850 on //depot/perl: ca0c25f67f45e5dccb746852d8545d7ae29ed067
p4raw-id: //depot/perl@25859
Diffstat (limited to 'win32')
| -rw-r--r-- | win32/perlhost.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/win32/perlhost.h b/win32/perlhost.h index dd63c7664e..c8a0406b6c 100644 --- a/win32/perlhost.h +++ b/win32/perlhost.h @@ -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) */ { |