1
1
mirror of https://github.com/github/semantic.git synced 2024-12-24 15:35:14 +03:00

Correct the kinds.

This commit is contained in:
Rob Rix 2019-09-27 18:51:12 -04:00
parent 074967337a
commit a4ebd26e25
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7

View File

@ -75,7 +75,7 @@ instance ToTagsBy 'Custom Java.MethodDeclaration where
Just Java.Block { ann = Loc Range { end } _ } -> end
Nothing -> end range
}
Tags.yield (Tag name Function span (firstLine sliced) Nothing)
Tags.yield (Tag name Method span (firstLine sliced) Nothing)
traverse_ tags typeParameters
tags parameters
tags type'
@ -91,7 +91,7 @@ instance ToTagsBy 'Custom Java.ClassDeclaration where
} = do
src <- ask @Source
let sliced = slice src (Range start end)
Tags.yield (Tag name Function span (firstLine sliced) Nothing)
Tags.yield (Tag name Class span (firstLine sliced) Nothing)
gtags t
firstLine :: Source -> Text