Skip to content

Limit the number of valid hole fits #1914

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Closed
wants to merge 14 commits into from
3 changes: 2 additions & 1 deletion ghcide/src/Development/IDE/GHC/Compat.hs
Original file line number Diff line number Diff line change
Expand Up @@ -184,6 +184,7 @@ import Data.List (foldl')
import Data.List (foldl', isSuffixOf)
#endif

import Control.Applicative ((<|>))
import qualified Data.Map as M
import DynamicLoading
import Plugins (Plugin (parsedResultAction),
Expand Down Expand Up @@ -303,7 +304,7 @@ setUpTypedHoles df
$ df
{ refLevelHoleFits = Just 1 -- becomes slow at higher levels
, maxRefHoleFits = Just 10 -- quantity does not impact speed
, maxValidHoleFits = Nothing -- quantity does not impact speed
, maxValidHoleFits = maxValidHoleFits df <|> Just 10 -- quantity does not impact speed
}


Expand Down