Remove unused imports

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

diff --git a/GHC/IO/FD.hs b/GHC/IO/FD.hs
index bf7c619..8e52584 100644 (file)
--- a/GHC/IO/FD.hs
+++ b/GHC/IO/FD.hs
@@ -30,7 +30,9 @@ import GHC.Real
 import GHC.Show
 import GHC.Enum
 import Data.Maybe
--- import Control.Monad
+#ifndef mingw32_HOST_OS
+import Control.Monad
+#endif
 import Data.Typeable
 
 import GHC.IO