From: Ian Lynagh <igloo@earth.li>
Date: Tue, 7 Jul 2009 18:19:24 +0000 (+0000)
Subject: Add back imports needed on Windows
X-Git-Tag: ghc-darcs-git-switchover~369
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=6d7493cd5526fbe654aaf4c41784e89d618ddcc1;p=ghc-base.git

Add back imports needed on Windows
---

diff --git a/GHC/Conc.lhs b/GHC/Conc.lhs
index 444d3fc..52b98f1 100644
--- a/GHC/Conc.lhs
+++ b/GHC/Conc.lhs
@@ -104,6 +104,10 @@ import System.Posix.Internals
 import Foreign
 import Foreign.C
 
+#ifdef mingw32_HOST_OS
+import Data.Typeable
+#endif
+
 #ifndef mingw32_HOST_OS
 import Data.Dynamic
 import Control.Monad
@@ -126,7 +130,7 @@ import GHC.Arr          ( inRange )
 #endif
 #ifdef mingw32_HOST_OS
 import GHC.Real         ( div )
-import GHC.Ptr          ( FunPtr(..) )
+import GHC.Ptr
 #endif
 #ifdef mingw32_HOST_OS
 import GHC.Read         ( Read )
diff --git a/GHC/ConsoleHandler.hs b/GHC/ConsoleHandler.hs
index 1300c96..e4b1d03 100644
--- a/GHC/ConsoleHandler.hs
+++ b/GHC/ConsoleHandler.hs
@@ -39,6 +39,13 @@ import GHC.Conc
 import Control.Concurrent.MVar
 import Data.Typeable
 
+#ifdef mingw32_HOST_OS
+import Data.Maybe
+import GHC.Base
+import GHC.Num
+import GHC.Real
+#endif
+
 data Handler
  = Default
  | Ignore