summaryrefslogtreecommitdiff
path: root/win32/win32io.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@engin.umich.edu>1997-04-05 23:31:11 -0500
committerChip Salzenberg <chip@atlantic.net>1997-04-04 00:00:00 +0000
commitdcb2879abe1a588042098f71cb130a72def08afb (patch)
treec07f969dda8b0f17c99a9ca1aa22548927abb147 /win32/win32io.c
parent5b54f415353cb889898fb25391f5dff73990f3f2 (diff)
downloadperl-dcb2879abe1a588042098f71cb130a72def08afb.tar.gz
perlwin-97a_4: win32 environ fix
private-msgid: 199704060431.XAA23400@aatma.engin.umich.edu
Diffstat (limited to 'win32/win32io.c')
-rw-r--r--win32/win32io.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/win32/win32io.c b/win32/win32io.c
index b4f58242cf..c9cc8e24e2 100644
--- a/win32/win32io.c
+++ b/win32/win32io.c
@@ -31,6 +31,12 @@ dummy_errno(void)
return (&(errno));
}
+static char ***
+dummy_environ(void)
+{
+ return (&(_environ));
+}
+
/* the rest are the remapped stdio routines */
static FILE *
dummy_stderr(void)
@@ -184,6 +190,7 @@ __declspec(dllexport)
WIN32_IOSUBSYSTEM win32stdio = {
12345678L, /* begin of structure; */
dummy_errno, /* (*pfunc_errno)(void); */
+ dummy_environ, /* (*pfunc_environ)(void); */
dummy_stdin, /* (*pfunc_stdin)(void); */
dummy_stdout, /* (*pfunc_stdout)(void); */
dummy_stderr, /* (*pfunc_stderr)(void); */