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 /util.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 'util.c')
| -rw-r--r-- | util.c | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -1934,8 +1934,9 @@ Perl_vwarner(pTHX_ U32 err, const char* pat, va_list* args) } } -#ifndef VMS /* VMS' my_setenv() is in VMS.c */ -#if !defined(WIN32) && !defined(__CYGWIN__) +#if !defined( VMS) && !defined(EPOC) + /* VMS' and EPOC's my_setenv() is in VMS.c */ +#if !defined(WIN32) && !defined(__CYGWIN__) && void Perl_my_setenv(pTHX_ char *nam, char *val) { @@ -2101,7 +2102,7 @@ Perl_setenv_getix(pTHX_ char *nam) return i; } -#endif /* !VMS */ +#endif /* !VMS && !EPOC*/ #ifdef UNLINK_ALL_VERSIONS I32 |