Commit 0dffbed4 authored by Ian Lynagh's avatar Ian Lynagh

Move the "This is a generated file" to the top of GHC.Prim

parent a4f49e90
......@@ -110,7 +110,13 @@ known_args
gen_hs_source :: Info -> String
gen_hs_source (Info defaults entries) =
"-----------------------------------------------------------------------------\n"
"{-\n"
++ "This is a generated file (generated by genprimopcode).\n"
++ "It is not code to actually be used. Its only purpose is to be\n"
++ "consumed by haddock.\n"
++ "-}\n"
++ "\n"
++ "-----------------------------------------------------------------------------\n"
++ "-- |\n"
++ "-- Module : GHC.Prim\n"
++ "-- \n"
......@@ -125,12 +131,6 @@ gen_hs_source (Info defaults entries) =
++ unlines (map (("\t" ++) . hdr) entries)
++ ") where\n"
++ "\n"
++ "{-\n"
++ "This is a generated file (generated by genprimopcode).\n"
++ "It is not code to actually be used. Its only purpose is to be\n"
++ "consumed by haddock.\n"
++ "-}\n"
++ "\n"
++ "import GHC.Bool\n"
++ "\n"
++ "{-\n"
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment