Another round of External Core fixes

[ghc-hetmet.git] / compiler / main / HeaderInfo.hs

diff --git a/compiler/main/HeaderInfo.hs b/compiler/main/HeaderInfo.hs
index 0915e60..a9e2051 100644 (file)
--- a/compiler/main/HeaderInfo.hs
+++ b/compiler/main/HeaderInfo.hs
@@ -196,8 +196,9 @@ checkExtension (L l ext)
 
 languagePragParseError :: SrcSpan -> a
 languagePragParseError loc =
-  pgmError (showSDoc (mkLocMessage loc (
-                text "cannot parse LANGUAGE pragma")))
+  pgmError 
+   (showSDoc (mkLocMessage loc (
+     text "cannot parse LANGUAGE pragma: comma-separated list expected")))
 
 unsupportedExtnError :: SrcSpan -> String -> a
 unsupportedExtnError loc unsup =