X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fghci%2FByteCodeItbls.lhs;h=c7f829e77dd87e0939767c218f484a5fcc0ade38;hb=04c6c9fd22839897ab87e2528011bdf13eb9b5ca;hp=730852f48a233aca3ac60043dcfcfeb692bfd22e;hpb=1dadca10a76ff290cbca1b283bea4f222cd3f6cd;p=ghc-hetmet.git diff --git a/ghc/compiler/ghci/ByteCodeItbls.lhs b/ghc/compiler/ghci/ByteCodeItbls.lhs index 730852f..c7f829e 100644 --- a/ghc/compiler/ghci/ByteCodeItbls.lhs +++ b/ghc/compiler/ghci/ByteCodeItbls.lhs @@ -27,12 +27,8 @@ import Bits ( Bits(..), shiftR ) import Monad ( liftM ) -import GlaExts ( Int(I#), addr2Int# ) -#if __GLASGOW_HASKELL__ < 503 -import Ptr ( Ptr(..) ) -#else +import GHC.Exts ( Int(I#), addr2Int# ) import GHC.Ptr ( Ptr(..) ) -#endif \end{code} %************************************************************************