diff options
author | Ian Lynagh <igloo@earth.li> | 2010-11-13 12:34:30 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2010-11-13 12:34:30 +0000 |
commit | 24948669dc9fe32dd0d09d8960add4c3909a95b2 (patch) | |
tree | a24d65bc458b8ea38cbba4f8ed2f8391a21495ad /libraries/base/codepages | |
parent | b1b414a683cdc5170186b7d4519d483d9acc32d2 (diff) | |
download | haskell-24948669dc9fe32dd0d09d8960add4c3909a95b2.tar.gz |
Add some comments to the generated Table.hs
Diffstat (limited to 'libraries/base/codepages')
-rw-r--r-- | libraries/base/codepages/MakeTable.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/libraries/base/codepages/MakeTable.hs b/libraries/base/codepages/MakeTable.hs index cd9a8b6efb..951274e8a4 100644 --- a/libraries/base/codepages/MakeTable.hs +++ b/libraries/base/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] |