From 5b2f6ed3d5efad6c6b8fe547875e03d901ba72d9 Mon Sep 17 00:00:00 2001 From: joshvera Date: Wed, 11 Jan 2017 16:32:01 -0500 Subject: [PATCH] Make TypeDecl Identifiable --- src/DiffSummary.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/DiffSummary.hs b/src/DiffSummary.hs index c85cac650..65c21a1fb 100644 --- a/src/DiffSummary.hs +++ b/src/DiffSummary.hs @@ -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 }