summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHerbert Valerio Riedel <hvr@gnu.org>2013-10-27 10:37:28 +0100
committerHerbert Valerio Riedel <hvr@gnu.org>2013-10-27 10:37:28 +0100
commitf81b974a4369814377d4a96c85daf48920bfc387 (patch)
treedaafed1f680a7c8885c4168047effa1670ca9d59
parent0620241a0f09d1ff865fa575eadb61aa59d2fe4f (diff)
downloadhaskell-f81b974a4369814377d4a96c85daf48920bfc387.tar.gz
Add more missing `{-# LANGUAGE #-}`s to `genprimopcode` output
This is a follow-up to 0620241a0f09d1ff865fa575eadb61aa59d2fe4f which addressed only the `Prim.hs` output; this commit adds the missing `LANGUAGE` pragmas for the generated `PrimopWrappers.hs` output as well. While at it, the redundant `CPP` pragma is removed from the generated `Prim.hs` file. Signed-off-by: Herbert Valerio Riedel <hvr@gnu.org>
-rw-r--r--utils/genprimopcode/Main.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/genprimopcode/Main.hs b/utils/genprimopcode/Main.hs
index 382b43cd13..d60081f6d3 100644
--- a/utils/genprimopcode/Main.hs
+++ b/utils/genprimopcode/Main.hs
@@ -244,7 +244,7 @@ gen_hs_source (Info defaults entries) =
++ "-- module directly.\n"
++ "--\n"
++ "-----------------------------------------------------------------------------\n"
- ++ "{-# LANGUAGE MultiParamTypeClasses #-}\n"
+ ++ "{-# LANGUAGE MagicHash, MultiParamTypeClasses, NoImplicitPrelude, UnboxedTuples #-}\n"
++ "module GHC.Prim (\n"
++ unlines (map (("\t" ++) . hdr) entries')
++ ") where\n"
@@ -649,7 +649,7 @@ gen_latex_doc (Info defaults entries)
gen_wrappers :: Info -> String
gen_wrappers (Info _ entries)
- = "{-# LANGUAGE CPP, MagicHash, NoImplicitPrelude, UnboxedTuples #-}\n"
+ = "{-# LANGUAGE MagicHash, NoImplicitPrelude, UnboxedTuples #-}\n"
-- Dependencies on Prelude must be explicit in libraries/base, but we
-- don't need the Prelude here so we add NoImplicitPrelude.
++ "module GHC.PrimopWrappers where\n"