X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Futils%2FFastMutInt.lhs;h=86ca0bd7f716c224c77a45c8da8dfb7b22ba1815;hb=2d52ee06786e5caf0c2d65a4b4bb7c45c6493190;hp=b483a1428edf30bc592e3fd9e4361d8f25447054;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git diff --git a/compiler/utils/FastMutInt.lhs b/compiler/utils/FastMutInt.lhs index b483a14..86ca0bd 100644 --- a/compiler/utils/FastMutInt.lhs +++ b/compiler/utils/FastMutInt.lhs @@ -1,6 +1,6 @@ {-# OPTIONS -cpp #-} -- --- (c) The University of Glasgow 2002 +-- (c) The University of Glasgow 2002-2006 -- -- Unboxed mutable Ints @@ -17,13 +17,8 @@ module FastMutInt( #endif -#if __GLASGOW_HASKELL__ < 503 -import GlaExts -import PrelIOBase -#else import GHC.Base import GHC.IOBase -#endif #if __GLASGOW_HASKELL__ < 411 newByteArray# = newCharArray#