X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=cbits%2FWin32Utils.c;h=e0343555e166c4995409f8f4ded96b47625c812d;hb=a3b803cedaf9ef18f1632101743fa2efb06cb580;hp=dca270ae4a717d7f43898dffa348547118d7b509;hpb=a3a69ff00ebaf4db4668037fc99cb3a59f55bef7;p=haskell-directory.git

diff --git a/cbits/Win32Utils.c b/cbits/Win32Utils.c
index dca270a..e034355 100644
--- a/cbits/Win32Utils.c
+++ b/cbits/Win32Utils.c
@@ -4,6 +4,8 @@
    Useful Win32 bits
    ------------------------------------------------------------------------- */
 
+#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)
+
 #include "HsBase.h"
 
 /* This is the error table that defines the mapping between OS error
@@ -119,3 +121,5 @@ HsInt getTicksOfDay(void)
     return (HsInt)t;
 }
 
+#endif
+