2007-12-06 Robert Dewar <dewar@adacore.com>

[pf3gnuchains/gcc-fork.git] / gcc / ada / env.c

diff --git a/gcc/ada/env.c b/gcc/ada/env.c
index 4d36109..6cbb705 100644 (file)
--- a/gcc/ada/env.c
+++ b/gcc/ada/env.c
@@ -177,11 +177,12 @@ __gnat_setenv (char *name, char *value)
 
   sprintf (expression, "%s=%s", name, value);
   putenv (expression);
-#if (defined (__FreeBSD__) && (__FreeBSD__ < 7)) || defined (__APPLE__) \
-   || defined (__MINGW32__) ||(defined (__vxworks) && ! defined (__RTP__))
-  /* On some systems like pre-7 FreeBSD, MacOS X and Windows, putenv is making
-     a copy of the expression string so we can free it after the call to
-     putenv */
+#if (defined (__FreeBSD__) && (__FreeBSD__ < 7)) \
+   || defined (__APPLE__) || defined (__MINGW32__) \
+   ||(defined (__vxworks) && ! defined (__RTP__))
+  /* On some systems like FreeBSD 6.x and earlier, MacOS X and Windows,
+     putenv is making a copy of the expression string so we can free
+     it after the call to putenv */
   free (expression);
 #endif
 #endif