From 79d9561c4f92c15ee62ebd98e5e1547e8ed2b5df Mon Sep 17 00:00:00 2001
From: joshvera <josh@joshvera.com>
Date: Thu, 12 Jan 2017 18:28:49 -0500
Subject: [PATCH] Make types identifiable for now

---
 src/DiffSummary.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/DiffSummary.hs b/src/DiffSummary.hs
index e2cd9399f..fae194d2a 100644
--- a/src/DiffSummary.hs
+++ b/src/DiffSummary.hs
@@ -64,6 +64,7 @@ identifiable term = isIdentifiable (unwrap term) term
           S.Object ty _ -> if isJust ty then Identifiable else Unidentifiable
           S.BlockStatement{} -> Identifiable
           S.TypeDecl{} -> Identifiable
+          S.Ty{} -> Identifiable
           _ -> Unidentifiable
 
 data JSONSummary summary span = JSONSummary { summary :: summary, span :: span }