1
1
mirror of https://github.com/github/semantic.git synced 2025-01-05 22:28:10 +03:00

update ToTags instance for Rb.Method

This commit is contained in:
Ayman Nadeem 2020-05-11 16:47:54 -04:00
parent ab3ee6f414
commit d8e48e55f6

View File

@ -169,13 +169,13 @@ instance ToTags Rb.Method where
tags
t@Rb.Method
{ ann = Loc {byteRange = Range {start}},
name,
name = Parse.Success n,
parameters
} = yieldMethodNameTag t range' name
} = yieldMethodNameTag t range' n
where
range' = case parameters of
Just Rb.MethodParameters {ann = Loc {byteRange = Range {end}}} -> Range start end
_ -> Range start (getEnd name)
Just (Parse.Success (Rb.MethodParameters {ann = Loc {byteRange = Range {end}}})) -> Range start end
_ -> Range start (getEnd n)
getEnd = Range.end . byteRange . TS.gann
instance ToTags Rb.SingletonMethod where