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 <[email protected]> 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, _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
