X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FbasicTypes%2FUniqSupply.lhs;h=493bfbe6dba572509c119692d2c51782f114b1a6;hp=a4c16fdc05180d5376cf5fa4b3564571bccf3e4c;hb=edc0bafd3fcd01b85a2e8894e5dfe149eb0e0857;hpb=4f37664780b85725ba3552b7de11c0e5e79d3fee diff --git a/compiler/basicTypes/UniqSupply.lhs b/compiler/basicTypes/UniqSupply.lhs index a4c16fd..493bfbe 100644 --- a/compiler/basicTypes/UniqSupply.lhs +++ b/compiler/basicTypes/UniqSupply.lhs @@ -31,11 +31,7 @@ import FastTypes import MonadUtils import Control.Monad -#if __GLASGOW_HASKELL__ >= 611 import GHC.IO (unsafeDupableInterleaveIO) -#else -import GHC.IOBase (unsafeDupableInterleaveIO) -#endif \end{code}