X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=codepages%2FMakeTable.hs;h=e17380b5381251be16b637ba92c84dfb15d379ad;hb=41e8fba828acbae1751628af50849f5352b27873;hp=951274e8a434100e2da6b7378d56939ea315af26;hpb=ac0439db2ece671089cec9ade21754c3ad22c134;p=ghc-base.git

diff --git a/codepages/MakeTable.hs b/codepages/MakeTable.hs
index 951274e..e17380b 100644
--- a/codepages/MakeTable.hs
+++ b/codepages/MakeTable.hs
@@ -200,7 +200,7 @@ compress n ms = runState (mapM lookupOrAdd chunks) (Map.empty, Map.empty)
 -- Static parts of the generated module.
 
 languageDirectives :: [String]
-languageDirectives = ["{-# LANGUAGE MagicHash #-}"]
+languageDirectives = ["{-# LANGUAGE CPP, MagicHash #-}"]
 
 
 firstComment :: [FilePath] -> [String]