From: Ian Lynagh Date: Fri, 20 Feb 2009 17:39:41 +0000 (+0000) Subject: Fix warnings: put imports inside ifdefs X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2e2f9463fd8ec19a7f40973bdee070bea76e047e;p=ghc-base.git Fix warnings: put imports inside ifdefs --- diff --git a/GHC/Conc.lhs b/GHC/Conc.lhs index 25eef9f..1351125 100644 --- a/GHC/Conc.lhs +++ b/GHC/Conc.lhs @@ -114,16 +114,20 @@ import System.Posix.Internals import Foreign import Foreign.C +#ifndef mingw32_HOST_OS import Data.Dynamic -import Data.Maybe import Control.Monad +#endif +import Data.Maybe import GHC.Base import {-# SOURCE #-} GHC.Handle import GHC.IOBase import GHC.Num ( Num(..) ) import GHC.Real ( fromIntegral ) +#ifndef mingw32_HOST_OS import GHC.Arr ( inRange ) +#endif #ifdef mingw32_HOST_OS import GHC.Real ( div ) import GHC.Ptr ( plusPtr, FunPtr(..) )