X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Futils%2FIOEnv.hs;h=c0277ae851118ba14e3f2558ff69b553f1b57145;hb=84923cc7de2a93c22a2f72daf9ac863959efae13;hp=8116effb331ea2b2c1590ef176d634ccbc34d1aa;hpb=b00b5bc04ff36a551552470060064f0b7d84ca30;p=ghc-hetmet.git diff --git a/compiler/utils/IOEnv.hs b/compiler/utils/IOEnv.hs index 8116eff..c0277ae 100644 --- a/compiler/utils/IOEnv.hs +++ b/compiler/utils/IOEnv.hs @@ -1,4 +1,5 @@ --- (c) The University of Glasgow 2002 +-- +-- (c) The University of Glasgow 2002-2006 -- -- The IO Monad with an environment -- @@ -26,9 +27,10 @@ module IOEnv ( #include "HsVersions.h" import Panic ( try, tryUser, tryMost, Exception(..) ) -import DATA_IOREF ( IORef, newIORef, readIORef, writeIORef ) -import UNSAFE_IO ( unsafeInterleaveIO ) -import FIX_IO ( fixIO ) + +import Data.IORef ( IORef, newIORef, readIORef, writeIORef ) +import System.IO.Unsafe ( unsafeInterleaveIO ) +import System.IO ( fixIO ) ----------------------------------------------------------------------