X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=codepages%2FMakeTable.hs;h=951274e8a434100e2da6b7378d56939ea315af26;hb=4748a7927948a6538c6e96a3d06bea75545b9301;hp=cd9a8b6efb015ebf6ce69a81939ad22c224654ff;hpb=d38a30230a4dccdb63c21183c9b2fc8783066b83;p=ghc-base.git

diff --git a/codepages/MakeTable.hs b/codepages/MakeTable.hs
index cd9a8b6..951274e 100644
--- a/codepages/MakeTable.hs
+++ b/codepages/MakeTable.hs
@@ -14,7 +14,6 @@ Currently, this script only supports single-byte encodings, since the lookup
 tables required for the CJK double-byte codepages are too large to be
 statically linked into every executable.  We plan to add support for them once
 GHC is able to produce Windows DLLs.
-
 --}
 
 module Main where
@@ -207,7 +206,10 @@ languageDirectives = ["{-# LANGUAGE MagicHash #-}"]
 firstComment :: [FilePath] -> [String]
 firstComment files = map ("-- " ++) $
     [ "Do not edit this file directly!"
-    , "It was generated by the MakeTable.hs script using the following files:"
+    , "It was generated by the MakeTable.hs script using the files below."
+    , "To regenerate it, run \"make\" in ../../../../codepages/"
+    , ""
+    , "Files:"
     ] ++ map takeFileName files
 
 theImports :: [String]