aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/GHC
diff options
context:
space:
mode:
Diffstat (limited to 'src/Haddock/GHC')
-rw-r--r--src/Haddock/GHC/Typecheck.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/GHC/Typecheck.hs b/src/Haddock/GHC/Typecheck.hs
index ff636bfd..2cb90344 100644
--- a/src/Haddock/GHC/Typecheck.hs
+++ b/src/Haddock/GHC/Typecheck.hs
@@ -60,7 +60,7 @@ typecheckFiles files = do
(\err -> do
printExceptionAndWarnings err
throwE ("Failed to check module: " ++ moduleString mod)) $
- do tc_mod <- typecheckModule =<< parseModule (moduleName mod)
+ do tc_mod <- typecheckModule =<< parseModule =<< getModSummary (moduleName mod)
let Just renamed_src = renamedSource tc_mod
return $ mkGhcModule (mod, file, (parsedSource tc_mod,
renamed_src,