summaryrefslogtreecommitdiff
path: root/dosish.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-10-21 21:31:20 +0000
committerNicholas Clark <nick@ccl4.org>2006-10-21 21:31:20 +0000
commit2f44961c9ce6c8fb4890c3bab297136d08c70307 (patch)
treeb30f39b78f512da99fcac90cf22d74bd1ec28296 /dosish.h
parent6b29934bd65555b7f172ba7a683ba95b59eb919b (diff)
downloadperl-2f44961c9ce6c8fb4890c3bab297136d08c70307.tar.gz
Add PERLIO_INIT to PERL_SYS_INIT.
I infer that this was accidentally omitted from change 29060 p4raw-id: //depot/perl@29074
Diffstat (limited to 'dosish.h')
-rw-r--r--dosish.h12
1 files changed, 8 insertions, 4 deletions
diff --git a/dosish.h b/dosish.h
index b930de2e3b..35ed99dbff 100644
--- a/dosish.h
+++ b/dosish.h
@@ -16,7 +16,8 @@
#ifdef DJGPP
# define BIT_BUCKET "nul"
# define OP_BINARY O_BINARY
-# define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v) Perl_DJGPP_init(c,v)
+# define PERL_SYS_INIT(c,v) \
+ MALLOC_CHECK_TAINT2(*c,*v) Perl_DJGPP_init(c,v); PERLIO_INIT
# define init_os_extras Perl_init_os_extras
# define HAS_UTIME
# define HAS_KILL
@@ -28,15 +29,18 @@
# define PERL_FS_VER_FMT "%d_%d_%d"
#else /* DJGPP */
# ifdef WIN32
-# define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v) Perl_win32_init(c,v)
+# define PERL_SYS_INIT(c,v) \
+ MALLOC_CHECK_TAINT2(*c,*v) Perl_win32_init(c,v); PERLIO_INIT
# define PERL_SYS_TERM() Perl_win32_term()
# define BIT_BUCKET "nul"
# else
# ifdef NETWARE
-# define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v) Perl_nw5_init(c,v)
+# define PERL_SYS_INIT(c,v) \
+ MALLOC_CHECK_TAINT2(*c,*v) Perl_nw5_init(c,v); PERLIO_INIT
# define BIT_BUCKET "nwnul"
# else
-# define PERL_SYS_INIT(c,v) MALLOC_CHECK_TAINT2(*c,*v)
+# define PERL_SYS_INIT(c,v) \
+ MALLOC_CHECK_TAINT2(*c,*v); PERLIO_INIT
# define BIT_BUCKET "\\dev\\nul" /* "wanna be like, umm, Newlined, or somethin?" */
# endif /* NETWARE */
# endif