X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Futils%2FFastFunctions.lhs;h=5496ed051c6f4711af1ee308876d68241ecbebf8;hb=da9d10064c084fed395e6030b1cb82bee2b140ed;hp=86c89bd9c73f5221d2365690c4ebd6e28397cb9d;hpb=893a3c0ad6c39caf71ac28af900733513e1f153e;p=ghc-hetmet.git diff --git a/compiler/utils/FastFunctions.lhs b/compiler/utils/FastFunctions.lhs index 86c89bd..5496ed0 100644 --- a/compiler/utils/FastFunctions.lhs +++ b/compiler/utils/FastFunctions.lhs @@ -22,8 +22,7 @@ import System.IO.Unsafe import GHC.Exts import GHC.Word -import GHC.IOBase (IO(..)) -import GHC.IOBase (unsafeDupableInterleaveIO) +import GHC.IO (IO(..), unsafeDupableInterleaveIO) import GHC.Base (unsafeChr) -- Just like unsafePerformIO, but we inline it.