From 994008d519cd6a065e00d3e5e6b36434eef8b7dd Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adam@chlipala.net>
Date: Fri, 28 Oct 2011 08:54:44 -0400
Subject: Clear reducedSummaries

---
 src/elaborate.sml | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/elaborate.sml b/src/elaborate.sml
index 89accb26..5b54db9a 100644
--- a/src/elaborate.sml
+++ b/src/elaborate.sml
@@ -777,6 +777,8 @@
 
  and unifySummaries env (loc, k, s1 : record_summary, s2 : record_summary) =
      let
+         val () = reducedSummaries := NONE
+
          (*val () = eprefaces "Summaries" [("loc", PD.string (ErrorMsg.spanToString loc)),
                                          ("#1", p_summary env s1),
                                          ("#2", p_summary env s2)]*)
-- 
cgit v1.2.3