git.iko.soy/ghcide
on master help sign in
Don't pass the same argument twice (#1708)
commitcb7d95edac8599ca64d3a6bc30924c2f63476c3f authorNeil Mitchell <35463327+neil-da@users.noreply.github.com> dateMon 17 Jun 2019, 14:20 (7 years ago) parente17aa60
2 files changed+3−4
compare with master
unifiedsplit
src/Development/IDE/Functions/Compile.hs+2−3 src/Development/IDE/State/Rules.hs+1−1
src/Development/IDE/Functions/Compile.hs+2−3
@@ -133,14 +133,13 @@ getPackage dflags p =
133133-- | Typecheck a single module using the supplied dependencies and packages.
134134typecheckModule
135135 :: IdeOptions
136− -> ParsedModule
137136 -> HscEnv
138137 -> [TcModuleResult]
139138 -> ParsedModule
140139 -> IO ([FileDiagnostic], Maybe TcModuleResult)
141−typecheckModule opt mod packageState deps pm =
140+typecheckModule opt packageState deps pm =
142141 fmap (either (, Nothing) (second Just)) $ Ex.runExceptT $
143− runGhcSessionExcept opt (Just mod) packageState $
142+ runGhcSessionExcept opt (Just pm) packageState $
144143 catchSrcErrors $ do
145144 setupEnv deps
146145 (warnings, tcm) <- withWarnings "Typechecker" $ \tweak ->
src/Development/IDE/State/Rules.hs+1−1
@@ -288,7 +288,7 @@ typeCheckRule =
288288 setPriority PriorityTypeCheck
289289 packageState <- use_ GhcSession ""
290290 opt <- getOpts
291− liftIO $ Compile.typecheckModule opt pm packageState tms pm
291+ liftIO $ Compile.typecheckModule opt packageState tms pm
292292
293293
294294generateCoreRule :: Rules ()