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
-- Static parts of the generated module.
languageDirectives :: [String]
-languageDirectives = ["{-# LANGUAGE MagicHash #-}"]
+languageDirectives = ["{-# LANGUAGE CPP, MagicHash, NoImplicitPrelude #-}"]
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]