diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-20 22:22:28 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-02-20 22:22:28 +0000 |
commit | 635bbe87639b3a9ff9c900336f8f6c30e3d557b9 (patch) | |
tree | ac40bfa596053c64e7de23f0c357bbba1a64113a /win32/perlhost.h | |
parent | 76438f5e79927218b9a4456083aa82f4e7e798f1 (diff) | |
download | perl-635bbe87639b3a9ff9c900336f8f6c30e3d557b9.tar.gz |
windows fixes for virtualizing child std{in,out,err} handles,
attempts to lock uninitialized critical section in files that
were never explicitly opened (from Doug Lankshear)
p4raw-id: //depot/perl@5169
Diffstat (limited to 'win32/perlhost.h')
-rw-r--r-- | win32/perlhost.h | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/win32/perlhost.h b/win32/perlhost.h index 4b4ad586a4..a748ead0b2 100644 --- a/win32/perlhost.h +++ b/win32/perlhost.h @@ -486,6 +486,12 @@ PerlEnvSiteLibPath(struct IPerlEnv* piPerl, char *pl) return g_win32_get_sitelib(pl); } +void +PerlEnvGetChildIO(struct IPerlEnv* piPerl, child_IO_table* ptr) +{ + win32_get_child_IO(ptr); +} + struct IPerlEnv perlEnv = { PerlEnvGetenv, @@ -500,6 +506,7 @@ struct IPerlEnv perlEnv = PerlEnvOsId, PerlEnvLibPath, PerlEnvSiteLibPath, + PerlEnvGetChildIO, }; #undef IPERL2HOST |