Use IdeResult in generateCore (#180)

use the `IdeResult` type synonym in the new `generateCore` function's return
type instead of effectively inlining it.
This commit is contained in:
Martin Huschenbett 2019-10-28 17:08:28 -04:00 committed by GitHub
parent 8745d54ae4
commit e9d862e80f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -280,7 +280,7 @@ typeCheckRule =
IdeOptions{ optDefer = defer} <- getIdeOptions
liftIO $ typecheckModule defer packageState tms pm
generateCore :: NormalizedFilePath -> Action ([FileDiagnostic], Maybe CoreModule)
generateCore :: NormalizedFilePath -> Action (IdeResult CoreModule)
generateCore file = do
deps <- use_ GetDependencies file
(tm:tms) <- uses_ TypeCheck (file:transitiveModuleDeps deps)