From: ross Date: Sun, 17 Oct 2004 00:22:03 +0000 (+0000) Subject: [project @ 2004-10-17 00:22:03 by ross] X-Git-Tag: nhc98-1-18-release~210 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=fc8eec6049cab18cf63e8f6d940e49ad3ffd27d6;p=ghc-base.git [project @ 2004-10-17 00:22:03 by ross] tighten imports --- diff --git a/Control/Concurrent.hs b/Control/Concurrent.hs index 97be321..02f74fb 100644 --- a/Control/Concurrent.hs +++ b/Control/Concurrent.hs @@ -91,7 +91,8 @@ import Prelude import Control.Exception as Exception #ifdef __GLASGOW_HASKELL__ -import GHC.Conc +import GHC.Conc ( ThreadId(..), myThreadId, killThread, yield, + threadDelay, threadWaitRead, threadWaitWrite ) import GHC.TopHandler ( reportStackOverflow, reportError ) import GHC.IOBase ( IO(..) ) import GHC.IOBase ( unsafeInterleaveIO )