We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 4c552cb commit f883799Copy full SHA for f883799
ghcide/src/Development/IDE/Spans/AtPoint.hs
@@ -227,6 +227,7 @@ atPoint IdeOptions{} (HAR _ hf _ _ kind) (DKMap dm km) env pos = listToMaybe $ p
227
wrapHaskell x = "\n```haskell\n"<>x<>"\n```\n"
228
info = nodeInfoH kind ast
229
names = M.assocs $ nodeIdentifiers info
230
+ -- Check if a name matches a pattern for a generated Core variable.
231
isInternal :: (Identifier, IdentifierDetails a) -> Bool
232
isInternal (Right n, _) =
233
let name = printOutputable n
0 commit comments