diff --git a/QA.hs b/QA.hs index 9b6ae79..46f3f9e 100644 --- a/QA.hs +++ b/QA.hs @@ -169,7 +169,7 @@ main = do content <- if hasCPP then processCPP file contentRaw else return contentRaw - let mode = defaultParseMode { parseFilename = file, extensions = exts } + let mode = defaultParseMode { parseFilename = file, extensions = exts, fixities = Nothing } case parseModuleWithMode mode content of ParseFailed srcLoc s -> do