1
1
mirror of https://github.com/github/semantic.git synced 2024-12-22 06:11:49 +03:00

Make TypeDecl identifiable but not Struct

This commit is contained in:
Rick Winfrey 2017-01-11 15:10:28 -08:00
parent 2bb7ec94ac
commit 24e8e87cd5

View File

@ -60,10 +60,10 @@ identifiable term = isIdentifiable (unwrap term) term
S.Switch{} -> Identifiable
S.Rescue{} -> Identifiable
S.Pair{} -> Identifiable
S.Struct{} -> Identifiable
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 }