summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2011-10-28 08:54:44 -0400
committerGravatar Adam Chlipala <adam@chlipala.net>2011-10-28 08:54:44 -0400
commit28e1f4daf5dd22a771359449ba79d5e7901bc41e (patch)
treeb3f509ea18182c0df8d96ce2bc19cd9eae29eb5d
parent607bfb0cccc394190a55c46676c6d6f901d67c11 (diff)
Clear reducedSummaries
-rw-r--r--src/elaborate.sml2
1 files changed, 2 insertions, 0 deletions
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)]*)