github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 14:21:31 +03:00
Code Issues Projects Releases Wiki Activity

Make types identifiable for now

Browse Source
This commit is contained in:
joshvera 2017-01-12 18:28:49 -05:00
parent 392ca1aae2
commit 79d9561c4f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/DiffSummary.hs
View File

@ -64,6 +64,7 @@ identifiable term = isIdentifiable (unwrap term) term
S.Object ty _ -> if isJust ty then Identifiable else Unidentifiable S.Object ty _ -> if isJust ty then Identifiable else Unidentifiable
S.BlockStatement{} -> Identifiable S.BlockStatement{} -> Identifiable
S.TypeDecl{} -> Identifiable S.TypeDecl{} -> Identifiable
S.Ty{} -> Identifiable
_ -> Unidentifiable _ -> Unidentifiable
data JSONSummary summary span = JSONSummary { summary :: summary, span :: span } data JSONSummary summary span = JSONSummary { summary :: summary, span :: span }