diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-03 00:57:08 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-03 00:57:08 +0000 |
| commit | 13b6e58cb5ac4fa23568d2f76512a5830dbb1688 (patch) | |
| tree | 611d23bd70ad0cd205b059d28403ba79d13a0699 /perl.h | |
| parent | 5a814814cd51e244388e778feeaca28d5d78d95b (diff) | |
| download | perl-13b6e58cb5ac4fa23568d2f76512a5830dbb1688.tar.gz | |
Introduce NO_ENVIRON_ARRAY (and USE_ENVIRON_ARRAY) defines
as suggested by Olaf Flebbe and Nicholas Clark.
p4raw-id: //depot/perl@7126
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -1628,7 +1628,11 @@ typedef struct ptr_tbl PTR_TBL_t; # endif # endif # endif -#endif +#endif + +#ifndef NO_ENVIRON_ARRAY +# define USE_ENVIRON_ARRAY +#endif #ifndef PERL_SYS_INIT3 # define PERL_SYS_INIT3(argvp,argcp,envp) PERL_SYS_INIT(argvp,argcp) @@ -2279,7 +2283,7 @@ EXT char *** environ_pointer; # endif #else /* VMS and some other platforms don't use the environ array */ -# if !defined(VMS) +# ifdef USE_ENVIRON_ARRAY # if !defined(DONT_DECLARE_STD) || \ (defined(__svr4__) && defined(__GNUC__) && defined(sun)) || \ defined(__sgi) || \ |