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 b78cd3f commit 1f642b3Copy full SHA for 1f642b3
ghcide/src/Development/IDE/Spans/AtPoint.hs
@@ -225,6 +225,7 @@ atPoint IdeOptions{} (HAR _ hf _ _ kind) (DKMap dm km) env pos = listToMaybe $ p
225
wrapHaskell x = "\n```haskell\n"<>x<>"\n```\n"
226
info = nodeInfoH kind ast
227
names = M.assocs $ nodeIdentifiers info
228
+ -- Check if a name matches a pattern for a generated Core variable.
229
isInternal :: (Identifier, IdentifierDetails a) -> Bool
230
isInternal (Right n, _) =
231
let name = printOutputable n
0 commit comments