Fix Windows-only warnings

[ghc-base.git] / GHC / IO.hs

diff --git a/GHC/IO.hs b/GHC/IO.hs
index f0d2fc1..e73b592 100644 (file)
--- a/GHC/IO.hs
+++ b/GHC/IO.hs
@@ -35,7 +35,9 @@ import Foreign.C
 import System.IO.Error
 import Data.Maybe
 import Control.Monad
+#ifndef mingw32_HOST_OS
 import System.Posix.Internals
+#endif
 
 import GHC.Enum
 import GHC.Base