From 6d7493cd5526fbe654aaf4c41784e89d618ddcc1 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Tue, 7 Jul 2009 18:19:24 +0000 Subject: [PATCH] Add back imports needed on Windows --- GHC/Conc.lhs | 6 +++++- GHC/ConsoleHandler.hs | 7 +++++++ 2 files changed, 12 insertions(+), 1 deletion(-) 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 -- 1.7.10.4