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 TypeDecl Identifiable

Browse Source
This commit is contained in:
joshvera 2017-01-11 16:32:01 -05:00
parent 74dbe899fa
commit 5b2f6ed3d5
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.Array ty _ -> if isJust ty then Identifiable else Unidentifiable S.Array ty _ -> if isJust ty then Identifiable else Unidentifiable
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
_ -> Unidentifiable _ -> Unidentifiable
data JSONSummary summary span = JSONSummary { summary :: summary, span :: span } data JSONSummary summary span = JSONSummary { summary :: summary, span :: span }