diff options
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) */ { |