From: Krister Walfridsson Date: Wed, 22 Aug 2007 16:00:54 +0000 (+0200) Subject: env.c ( __gnat_clearenv): Use the __gnat_unsetenv mechanism for NetBSD. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=51743df84409168a21a9480d979a3f87a7a44eb2;p=gcc.git env.c ( __gnat_clearenv): Use the __gnat_unsetenv mechanism for NetBSD. * env.c ( __gnat_clearenv): Use the __gnat_unsetenv mechanism for NetBSD. From-SVN: r127708 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c6f038e2fe3..f543f6984cf 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2007-08-22 Krister Walfridsson + + * env.c ( __gnat_clearenv): Use the __gnat_unsetenv mechanism for + NetBSD. + 2007-08-16 Kaveh R. Ghazi * misc.c (gnat_type_max_size): Constify. diff --git a/gcc/ada/env.c b/gcc/ada/env.c index cbcd1321836..808f10ba282 100644 --- a/gcc/ada/env.c +++ b/gcc/ada/env.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * Copyright (C) 2005-2006, Free Software Foundation, Inc. * + * Copyright (C) 2005-2007, 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- * @@ -288,7 +288,8 @@ void __gnat_clearenv (void) { index++; } #elif defined (__MINGW32__) || defined (__FreeBSD__) || defined (__APPLE__) \ - || (defined (__vxworks) && defined (__RTP__)) || defined (__CYGWIN__) + || (defined (__vxworks) && defined (__RTP__)) || defined (__CYGWIN__) \ + || defined (__NetBSD__) /* 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 */