mirror of
https://github.com/github/semantic.git
synced 2024-11-28 18:23:44 +03:00
add a param
This commit is contained in:
parent
b9f9dff1c6
commit
3ab42ca794
@ -139,7 +139,7 @@ termToDiffInfo blob term = case unwrap term of
|
||||
|
||||
toTermName :: forall leaf fields. DefaultFields fields => Source Char -> SyntaxTerm leaf fields -> Text
|
||||
toTermName source term = case unwrap term of
|
||||
S.Function identifier _ _ -> toTermName' identifier
|
||||
S.Function identifier _ _ _ -> toTermName' identifier
|
||||
S.Method identifier _ _ _ -> toTermName' identifier
|
||||
_ -> termNameFromSource term
|
||||
where
|
||||
|
Loading…
Reference in New Issue
Block a user