Mercurial > urweb

diff src/elaborate.sml @ 1738:1a35e75b6967

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Catch duplicate top-level module names; fix dropping of constraints during incremental elaboration; document treatment of record types as type class instance types
author Adam Chlipala <adam@chlipala.net>
date Thu, 03 May 2012 09:56:41 -0400
parents 78d7cc9c9b18
children fca4a6d05ac1
line wrap: on
line diff
--- a/src/elaborate.sml	Wed May 02 08:56:19 2012 -0400
+++ b/src/elaborate.sml	Thu May 03 09:56:41 2012 -0400
@@ -3934,7 +3934,7 @@
                          val env' = E.declBinds env d
                          val denv' = dopenConstraints (loc, env', denv) {str = x, strs = []}
                      in
-                         ([d], (env', denv', []))
+                         ([d], (env', denv', gs))
                      end
                    | NONE =>
                      let