From: Ian Lynagh <igloo@earth.li>
Date: Thu, 4 Sep 2008 20:28:45 +0000 (+0000)
Subject: Don't define __hscore_s_issock on Windows
X-Git-Url: http://git.megacz.com/?p=ghc-base.git;a=commitdiff_plain;h=526f1dd284159d7e7b52d0263bc61fd54459d78b

Don't define __hscore_s_issock on Windows
---

diff --git a/include/HsBase.h b/include/HsBase.h
index 0ee058d..fd10e11 100644
--- a/include/HsBase.h
+++ b/include/HsBase.h
@@ -229,8 +229,10 @@ INLINE int __hscore_s_isdir(mode_t m)  { return S_ISDIR(m);  }
 INLINE int __hscore_s_isfifo(mode_t m) { return S_ISFIFO(m); }
 INLINE int __hscore_s_isblk(mode_t m)  { return S_ISBLK(m);  }
 INLINE int __hscore_s_ischr(mode_t m)  { return S_ISCHR(m);  }
+#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
 INLINE int __hscore_s_issock(mode_t m) { return S_ISSOCK(m); }
 #endif
+#endif
 
 #if !defined(_MSC_VER) && !defined(__MINGW32__) && !defined(_WIN32)
 INLINE int