2006-05-02 David Billinghurst <David.Billinghurst@riotinto.com>

         PR ada/27366
         * ada/env.c (__gnat_clearenv): Use unsetenv() to clear
	 environment on Cygwin.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@113457 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index f921311..2e47aa6 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,9 @@
+2006-05-02  David Billinghurst <David.Billinghurst@riotinto.com>
+
+       PR ada/27366
+       * ada/env.c (__gnat_clearenv): Use unsetenv() to clear environment 
+       on Cygwin.
+
 2006-05-02  Jakub Jelinek  <jakub@redhat.com>
 
        PR middle-end/27337

diff --git a/gcc/ada/env.c b/gcc/ada/env.c
index bdba790..6b6cec6 100644 (file)
--- a/gcc/ada/env.c
+++ b/gcc/ada/env.c
@@ -288,7 +288,7 @@ void __gnat_clearenv (void) {
     index++;
   }
 #elif defined (__MINGW32__) || defined (__FreeBSD__) || defined (__APPLE__) \
-   || (defined (__vxworks) && defined (__RTP__))
+   || (defined (__vxworks) && defined (__RTP__)) || defined (__CYGWIN__)
   /* 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 */