diff options
author | Ian Lynagh <igloo@earth.li> | 2010-10-23 16:54:22 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2010-10-23 16:54:22 +0000 |
commit | 28cb2d6d40264796fb84da1f352490fd2b8eb27f (patch) | |
tree | dad732659400989ce4f498b5b1d4098f5a22aafd /utils | |
parent | c91279a1e4fd631d42ad903eaf699a96c22f380e (diff) | |
download | haskell-28cb2d6d40264796fb84da1f352490fd2b8eb27f.tar.gz |
Follow GHC.Bool/GHC.Types merge
Diffstat (limited to 'utils')
-rw-r--r-- | utils/genprimopcode/Main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/genprimopcode/Main.hs b/utils/genprimopcode/Main.hs index 2f7a287ea2..3d7c83f34f 100644 --- a/utils/genprimopcode/Main.hs +++ b/utils/genprimopcode/Main.hs @@ -132,7 +132,7 @@ gen_hs_source (Info defaults entries) = ++ unlines (map (("\t" ++) . hdr) entries) ++ ") where\n" ++ "\n" - ++ "import GHC.Bool\n" + ++ "import GHC.Types\n" ++ "\n" ++ "{-\n" ++ unlines (map opt defaults) @@ -487,7 +487,7 @@ gen_wrappers (Info _ entries) -- don't need the Prelude here so we add NoImplicitPrelude. ++ "module GHC.PrimopWrappers where\n" ++ "import qualified GHC.Prim\n" - ++ "import GHC.Bool (Bool)\n" + ++ "import GHC.Types (Bool)\n" ++ "import GHC.Unit ()\n" ++ "import GHC.Prim (" ++ types ++ ")\n" ++ unlines (concatMap f specs) |