summaryrefslogtreecommitdiff
path: root/win32/perlhost.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-02-20 22:22:28 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-02-20 22:22:28 +0000
commit635bbe87639b3a9ff9c900336f8f6c30e3d557b9 (patch)
treeac40bfa596053c64e7de23f0c357bbba1a64113a /win32/perlhost.h
parent76438f5e79927218b9a4456083aa82f4e7e798f1 (diff)
downloadperl-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.h7
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