DeferErrors implies DeferTypedHoles in GHC >= 7.10

The Opt_DeferErrors flag should imply Opt_DeferTypedHoles. The proper
API for setting these flags that implements such implications is
unfortunately not exposed by GHC.
This commit is contained in:
Anthony Cowley
2015-08-14 12:18:26 -04:00
parent 45f8194c0c
commit 78c5cea161
3 changed files with 4 additions and 7 deletions

View File

@@ -99,8 +99,5 @@ setNoMaxRelevantBindings = id
deferErrors :: DynFlags -> Ghc DynFlags
deferErrors df = return $
Gap.setWarnTypedHoles $ Gap.setDeferTypeErrors $ setNoWarningFlags df
deferErrorsAndHoles :: DynFlags -> Ghc DynFlags
deferErrorsAndHoles df = return $
Gap.setDeferTypeErrors $ Gap.setDeferTypedHoles $ setNoWarningFlags df
Gap.setWarnTypedHoles $ Gap.setDeferTypedHoles $
Gap.setDeferTypeErrors $ setNoWarningFlags df