diff options
| author | Olaf Flebbe <o.flebbe@science-computing.de> | 2000-09-21 01:16:26 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-03 00:34:59 +0000 |
| commit | ed79a026b5aec9cc3f786c2971aa15a4b21f396c (patch) | |
| tree | b0e2bf3556083784ba28cbb74402f950712d81d9 /perl.c | |
| parent | 444155da6cc74bc317db82ecaa4272f5cf6d3c9b (diff) | |
| download | perl-ed79a026b5aec9cc3f786c2971aa15a4b21f396c.tar.gz | |
Epoc update
Message-ID: <26423.969484586@www10.gmx.net>
p4raw-id: //depot/perl@7124
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -836,7 +836,7 @@ setuid perl scripts securely.\n"); PL_origargv = argv; PL_origargc = argc; -#ifndef VMS /* VMS doesn't have environ array */ +#if !defined( VMS) && !defined(EPOC) /* VMS doesn't have environ array */ PL_origenviron = environ; #endif @@ -1256,7 +1256,7 @@ print \" \\@INC:\\n @INC\\n\";"); if (xsinit) (*xsinit)(aTHXo); /* in case linked C routines want magical variables */ #ifndef PERL_MICRO -#if defined(VMS) || defined(WIN32) || defined(DJGPP) || defined(__CYGWIN__) +#if defined(VMS) || defined(WIN32) || defined(DJGPP) || defined(__CYGWIN__) || defined(EPOC) init_os_extras(); #endif #endif @@ -3468,7 +3468,7 @@ S_init_perllib(pTHX) #endif /* MACOS_TRADITIONAL */ } -#if defined(DOSISH) +#if defined(DOSISH) || defined(EPOC) # define PERLLIB_SEP ';' #else # if defined(VMS) |