diff options
author | Ian Lynagh <igloo@earth.li> | 2007-12-02 23:42:22 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2007-12-02 23:42:22 +0000 |
commit | bd3c90b1ae22f70125e4ec8238f830f88c2c607a (patch) | |
tree | 4573422437069965d71e0b97fe0612bd6f7c58f3 | |
parent | 951dad7b20f6ee8024388339fd8075b62b0a6261 (diff) | |
download | haskell-bd3c90b1ae22f70125e4ec8238f830f88c2c607a.tar.gz |
Use GHC.Exts rather than GHC.Prim
-rw-r--r-- | compiler/cmm/OptimizationFuel.hs | 2 | ||||
-rw-r--r-- | compiler/ghci/ByteCodeInstr.lhs | 2 | ||||
-rw-r--r-- | compiler/ghci/ByteCodeItbls.lhs | 1 | ||||
-rw-r--r-- | compiler/main/BreakArray.hs | 1 |
4 files changed, 2 insertions, 4 deletions
diff --git a/compiler/cmm/OptimizationFuel.hs b/compiler/cmm/OptimizationFuel.hs index c15bd4d630..49f8b055be 100644 --- a/compiler/cmm/OptimizationFuel.hs +++ b/compiler/cmm/OptimizationFuel.hs @@ -11,7 +11,7 @@ module OptimizationFuel ) where -import GHC.Prim +import GHC.Exts (State#) import Panic import Data.IORef diff --git a/compiler/ghci/ByteCodeInstr.lhs b/compiler/ghci/ByteCodeInstr.lhs index 50dbec1651..d5e5e8e744 100644 --- a/compiler/ghci/ByteCodeInstr.lhs +++ b/compiler/ghci/ByteCodeInstr.lhs @@ -37,7 +37,7 @@ import SMRep import GHC.Ptr import Module (Module) -import GHC.Prim +import GHC.Exts -- ---------------------------------------------------------------------------- diff --git a/compiler/ghci/ByteCodeItbls.lhs b/compiler/ghci/ByteCodeItbls.lhs index 3d1e1510d7..a05cfc1b63 100644 --- a/compiler/ghci/ByteCodeItbls.lhs +++ b/compiler/ghci/ByteCodeItbls.lhs @@ -38,7 +38,6 @@ import Data.Bits ( Bits(..), shiftR ) import GHC.Exts ( Int(I#), addr2Int# ) import GHC.Ptr ( Ptr(..) ) -import GHC.Prim import Debug.Trace import Text.Printf diff --git a/compiler/main/BreakArray.hs b/compiler/main/BreakArray.hs index 364a917371..8d86582efe 100644 --- a/compiler/main/BreakArray.hs +++ b/compiler/main/BreakArray.hs @@ -26,7 +26,6 @@ module BreakArray import GHC.Exts import GHC.IOBase -import GHC.Prim import GHC.Word import Constants |