X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FbasicTypes%2FUniqSupply.lhs;h=493bfbe6dba572509c119692d2c51782f114b1a6;hb=ea94a66d93047a9b0cd4532645eb1e9be04888e1;hp=a4c16fdc05180d5376cf5fa4b3564571bccf3e4c;hpb=a50e111f46a16529fe5f8d481919044c8aceea05;p=ghc-hetmet.git 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}