From: Ian Lynagh <igloo@earth.li>
Date: Tue, 20 May 2008 21:36:43 +0000 (+0000)
Subject: Fix the build on Windows
X-Git-Tag: 2008-05-28^0
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=039848a1250b650bf55492b8ad791b88313f5832;p=ghc-base.git

Fix the build on Windows
---

diff --git a/include/HsBase.h b/include/HsBase.h
index 1992342..7a059c8 100644
--- a/include/HsBase.h
+++ b/include/HsBase.h
@@ -687,9 +687,11 @@ INLINE int __hscore_fstat(int fd, struct_stat *buf) {
 	return (fstat(fd,buf));
 }
 
+#if !defined(__MINGW32__)
 INLINE int __hscore_mkstemp(char *filetemplate) {
     return (mkstemp(filetemplate));
 }
+#endif
 
 #if !defined(__MINGW32__) && !defined(irix_HOST_OS)
 INLINE int __hscore_getrlimit(int resource, struct rlimit *rlim) {