From 0dffbed453a400f0df66d68e3e64184c1e4d940d Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Fri, 5 Sep 2008 12:21:09 +0000 Subject: [PATCH] Move the "This is a generated file" to the top of GHC.Prim --- utils/genprimopcode/Main.hs | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/utils/genprimopcode/Main.hs b/utils/genprimopcode/Main.hs index d5279b7..760ebf4 100644 --- a/utils/genprimopcode/Main.hs +++ b/utils/genprimopcode/Main.hs @@ -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" -- 1.7.10.4