summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorDan Sugalski <dan@sidhe.org>2001-05-02 07:37:27 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-02 15:35:37 +0000
commitfd8cd3a3fe489fe70b00d1da7f9034bb1c56f03c (patch)
treedd0eebd71482f83187b55d14fa0340d6ffdc2cf6 /perl.c
parent09bf542c87dffb276bec96e979ba5437e7fc39b1 (diff)
downloadperl-fd8cd3a3fe489fe70b00d1da7f9034bb1c56f03c.tar.gz
Multiplicity and thread fixes for VMS
Message-Id: <5.0.2.1.0.20010502112909.01f24e28@24.8.96.48> p4raw-id: //depot/perl@9960
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index 0151338c85..77e3cb7bad 100644
--- a/perl.c
+++ b/perl.c
@@ -1304,7 +1304,11 @@ print \" \\@INC:\\n @INC\\n\";");
(*xsinit)(aTHXo); /* in case linked C routines want magical variables */
#ifndef PERL_MICRO
#if defined(VMS) || defined(WIN32) || defined(DJGPP) || defined(__CYGWIN__) || defined(EPOC)
+# if defined(VMS)
+ init_os_extras(aTHXo);
+# else
init_os_extras();
+# endif
#endif
#endif