[commit: unix] master: Only use unsetenv if HAVE_UNSETENV is defined (fixes #7343) (c35901a)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/unix

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/c35901aad10deb32c0128b7186c35bd96bf4a0bc

>---------------------------------------------------------------

commit c35901aad10deb32c0128b7186c35bd96bf4a0bc
Author: Simon Hengel <sol at typeful.net>
Date:   Thu Oct 18 00:40:19 2012 +0200

    Only use unsetenv if HAVE_UNSETENV is defined (fixes #7343)

>---------------------------------------------------------------

 cbits/HsUnix.c |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/cbits/HsUnix.c b/cbits/HsUnix.c
index dd4b4f6..aba5445 100644
--- a/cbits/HsUnix.c
+++ b/cbits/HsUnix.c
@@ -157,6 +157,7 @@ int __hscore_setrlimit(int resource, struct rlimit *rlim) {
 }
 #endif
 
+#ifdef HAVE_UNSETENV
 int __hsunix_unsetenv(const char *name)
 {
 #ifdef UNSETENV_RETURNS_VOID
@@ -166,6 +167,7 @@ int __hsunix_unsetenv(const char *name)
     return unsetenv(name);
 #endif
 }
+#endif
 
 /* A size that will contain many path names, but not necessarily all
  * (PATH_MAX is not defined on systems with unlimited path length,