diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2015-05-30 21:13:59 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2015-05-30 21:13:59 +0000 |
| commit | 329be64b06b51c21981dc9aba66da805dc4398bf (patch) | |
| tree | 939ed8411c661f6e8dcf7ab478a1cc1abfa98185 /gcc/ada/env.c | |
| parent | c67e8801d95237cf126a5b8ad6c2f59fc92c455a (diff) | |
| download | gcc-329be64b06b51c21981dc9aba66da805dc4398bf.zip gcc-329be64b06b51c21981dc9aba66da805dc4398bf.tar.gz gcc-329be64b06b51c21981dc9aba66da805dc4398bf.tar.bz2 | |
adaint.c: Test for __linux__ instead of linux and __sun__ instead of sun.
* adaint.c: Test for __linux__ instead of linux and __sun__ instead
of sun. Add missing leading underscore to AIX. Remove #elif 0.
* adaint.h: Likewise.
* cio.c: Likewise.
* cstreams.c: Likewise.
* env.c: Likewise.
* gsocket.h: Likewise.
* init.c: Likewise. Test for __i386__ instead of i386.
* link.c: Likewise.
* s-oscons-tmplt.c: Likewise.
* sysdep.c: Likewise.
* terminals.c: Likewise. Use BSD symbol instead of FREEBSD.
* tracebak.c: Likewise. Test for __sparc__ instead of sparc.
From-SVN: r223890
Diffstat (limited to 'gcc/ada/env.c')
| -rw-r--r-- | gcc/ada/env.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/env.c b/gcc/ada/env.c index 1a2afd6..dcb03f7 100644 --- a/gcc/ada/env.c +++ b/gcc/ada/env.c @@ -211,7 +211,7 @@ __gnat_environ (void) return NULL; #elif defined (__MINGW32__) return _environ; -#elif defined (sun) +#elif defined (__sun__) extern char **_environ; return _environ; #elif defined (__APPLE__) && !defined (__arm__) @@ -229,7 +229,7 @@ void __gnat_unsetenv (char *name) #if defined (VMS) /* Not implemented */ return; -#elif defined (__hpux__) || defined (sun) \ +#elif defined (__hpux__) || defined (__sun__) \ || (defined (__vxworks) && ! defined (__RTP__)) \ || defined (_AIX) || defined (__Lynx__) @@ -288,7 +288,7 @@ void __gnat_clearenv (void) #if defined (VMS) /* not implemented */ return; -#elif defined (sun) \ +#elif defined (__sun__) \ || (defined (__vxworks) && ! defined (__RTP__)) || defined (__Lynx__) \ || defined (__PikeOS__) /* On Solaris, VxWorks (not RTPs), and Lynx there is no system |