From 04c6c9fd22839897ab87e2528011bdf13eb9b5ca Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 3 Sep 2002 15:33:10 +0000
Subject: [PATCH] [project @ 2002-09-03 15:32:16 by simonmar] GlaExts =>
 GHC.Exts

---
 ghc/compiler/ghci/ByteCodeItbls.lhs |    6 +-----
 ghc/compiler/ghci/ByteCodeLink.lhs  |    2 +-
 2 files changed, 2 insertions(+), 6 deletions(-)

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}
 
 %************************************************************************
diff --git a/ghc/compiler/ghci/ByteCodeLink.lhs b/ghc/compiler/ghci/ByteCodeLink.lhs
index 9e1e888..0ca24f8 100644
--- a/ghc/compiler/ghci/ByteCodeLink.lhs
+++ b/ghc/compiler/ghci/ByteCodeLink.lhs
@@ -51,7 +51,7 @@ import Data.Int		( Int64 )
 import System.IO	( fixIO )
 import Control.Exception ( throwDyn )
 
-import GlaExts		( BCO#, newBCO#, unsafeCoerce#, 
+import GHC.Exts		( BCO#, newBCO#, unsafeCoerce#, 
 			  ByteArray#, Array#, addrToHValue#, mkApUpd0# )
 
 import GHC.Arr		( Array(..) )
-- 
1.7.10.4