mark System.IO.openTempFile as non-portable in haddocks
[haskell-directory.git] / cbits / lockFile.c
index e892ed4..721246b 100644 (file)
@@ -6,11 +6,11 @@
  * stdin/stout/stderr Runtime Support
  */
 
-#ifndef mingw32_HOST_OS
+#if !(defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32))
 
 #include "HsBase.h"
 #include "Rts.h"
-#include "../../ghc/rts/RtsUtils.h" // for barf()
+#include "RtsUtils.h"
 
 typedef struct {
     dev_t device;