Commit 3023a007 authored by's avatar
Browse files

Improve error message for malformed LANGUAGE pragma

I made the error (which previously said "cannot parse LANGUAGE
pragma") slightly more helpful by reminding the user that pragmas
should be comma-separated.
parent 1377a164
...@@ -196,8 +196,9 @@ checkExtension (L l ext) ...@@ -196,8 +196,9 @@ checkExtension (L l ext)
languagePragParseError :: SrcSpan -> a languagePragParseError :: SrcSpan -> a
languagePragParseError loc = languagePragParseError loc =
pgmError (showSDoc (mkLocMessage loc ( pgmError
text "cannot parse LANGUAGE pragma"))) (showSDoc (mkLocMessage loc (
text "cannot parse LANGUAGE pragma: comma-separated list expected")))
unsupportedExtnError :: SrcSpan -> String -> a unsupportedExtnError :: SrcSpan -> String -> a
unsupportedExtnError loc unsup = unsupportedExtnError loc unsup =
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment