check does not use overrideGhcUserOptions again.

- workaround for #376
- logically reverting ec1b115cc1
This commit is contained in:
Kazu Yamamoto 2014-09-22 10:46:46 +09:00
parent e8988c2f02
commit b96a8c6457
1 changed files with 5 additions and 0 deletions

View File

@ -30,10 +30,15 @@ checkSyntax files = either id id <$> check files
check :: IOish m
=> [FilePath] -- ^ The target files.
-> GhcModT m (Either String String)
{-
check fileNames = overrideGhcUserOptions $ \ghcOpts -> do
withLogger (setAllWarningFlags . setNoMaxRelevantBindings . Gap.setWarnTypedHoles . Gap.setDeferTypeErrors) $ do
_ <- G.setSessionDynFlags =<< addCmdOpts ghcOpts =<< G.getSessionDynFlags
setTargetFiles fileNames
-}
check fileNames =
withLogger (setAllWarningFlags . setNoMaxRelevantBindings) $
setTargetFiles fileNames
----------------------------------------------------------------