github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-27 12:57:49 +03:00
Code Issues Projects Releases Wiki Activity

Update semantic-java.

Browse Source
This commit is contained in:
Rob Rix 2019-10-08 15:04:00 -04:00
parent 51e74b9b1e
commit 49cba72090
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
semantic-java/src/Language/Java/Tags.hs
View File

@ -54,7 +54,7 @@ instance (ToTags l, ToTags r) => ToTagsBy 'Custom (l :+: r) where
instance ToTagsBy 'Custom Java.MethodDeclaration where
tags' t@Java.MethodDeclaration
{ ann = Loc range span
, name = Java.Identifier { bytes = name }
, name = Java.Identifier { text = name }
, body
} = do
src <- ask @Source
@ -69,7 +69,7 @@ instance ToTagsBy 'Custom Java.MethodDeclaration where
instance ToTagsBy 'Custom Java.ClassDeclaration where
tags' t@Java.ClassDeclaration
{ ann = Loc Range { start } span
, name = Java.Identifier { bytes = name }
, name = Java.Identifier { text = name }
, body = Java.ClassBody { ann = Loc Range { start = end } _ }
} = do
src <- ask @Source
@ -80,7 +80,7 @@ instance ToTagsBy 'Custom Java.ClassDeclaration where
instance ToTagsBy 'Custom Java.MethodInvocation where
tags' t@Java.MethodInvocation
{ ann = Loc range span
, name = Java.Identifier { bytes = name }
, name = Java.Identifier { text = name }
} = do
src <- ask @Source
let sliced = slice src range