aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/env.c
diff options
context:
space:
mode:
authorJoel Sherrill <joel.sherrill@oarcorp.com>2008-02-13 19:04:53 +0000
committerJoel Sherrill <joel@gcc.gnu.org>2008-02-13 19:04:53 +0000
commit6a333ca04f20c16c42aa15c004a26ebbc9fad02c (patch)
tree14647ee8187ad1d1a148b61d285e6fbfb10bbb54 /gcc/ada/env.c
parent29a7754d166900ec2f48fd290a5496e0e75bf9bf (diff)
downloadgcc-6a333ca04f20c16c42aa15c004a26ebbc9fad02c.zip
gcc-6a333ca04f20c16c42aa15c004a26ebbc9fad02c.tar.gz
gcc-6a333ca04f20c16c42aa15c004a26ebbc9fad02c.tar.bz2
re PR ada/35143 (Serious regression on ACATS results since 4.2.3)
2008-02-11 Joel Sherrill <joel.sherrill@oarcorp.com> PR ada/35143 * env.c: Add __rtems__ to if defined. * s-osinte-rtems.adb: Add To_Target_Priority. Fix formatting. * s-osinte-rtems.ads: Add To_Target_Priority prototype and PTHREAD_SCOPE_PROCESS/PTHREAD_SCOPE_SYSTEM constants. Add pragma Convention as required. * gsocket.h: Make compile in and out of RTS. * Makefile.in: Add system-rtems.ads. Build DEC extensions. Use g-soccon-rtems.ads. * g-soccon-rtems.ads, system-rtems.ads: New files. From-SVN: r132294
Diffstat (limited to 'gcc/ada/env.c')
-rw-r--r--gcc/ada/env.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/env.c b/gcc/ada/env.c
index 46bfe1b0c..01c25d6 100644
--- a/gcc/ada/env.c
+++ b/gcc/ada/env.c
@@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
- * Copyright (C) 2005-2007, Free Software Foundation, Inc. *
+ * Copyright (C) 2005-2008, Free Software Foundation, Inc. *
* *
* GNAT is free software; you can redistribute it and/or modify it under *
* terms of the GNU General Public License as published by the Free Soft- *
@@ -290,7 +290,7 @@ void __gnat_clearenv (void) {
}
#elif defined (__MINGW32__) || defined (__FreeBSD__) || defined (__APPLE__) \
|| (defined (__vxworks) && defined (__RTP__)) || defined (__CYGWIN__) \
- || defined (__NetBSD__) || defined (__OpenBSD__)
+ || defined (__NetBSD__) || defined (__OpenBSD__) || defined (__rtems__)
/* On Windows, FreeBSD and MacOS there is no function to clean all the
environment but there is a "clean" way to unset a variable. So go
through the environ table and call __gnat_unsetenv on all entries */