1
1
mirror of https://github.com/github/semantic.git synced 2024-12-22 14:21:31 +03:00

Make TypeDecl Identifiable

This commit is contained in:
joshvera 2017-01-11 16:32:01 -05:00
parent 74dbe899fa
commit 5b2f6ed3d5

View File

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