Mercurial > urweb

diff src/elaborate.sml @ 478:6ee1c761818f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Some small changes while failing to write [restrict]
author Adam Chlipala <adamc@hcoop.net>
date Sat, 08 Nov 2008 13:15:00 -0500
parents 20fab0e96217
children 40c737913075
line wrap: on
line diff
--- a/src/elaborate.sml	Sat Nov 08 12:24:23 2008 -0500
+++ b/src/elaborate.sml	Sat Nov 08 13:15:00 2008 -0500
@@ -3424,7 +3424,7 @@
                                                  [("loc", PD.string (ErrorMsg.spanToString loc)),
                                                   ("c1", p_con env c1),
                                                   ("c2", p_con env c2)];
-                                        raise Fail "Unresolve constraint in top.ur"))
+                                        raise Fail "Unresolved constraint in top.ur"))
                                 | TypeClass _ => raise Fail "Unresolved type class constraint in top.ur") gs
         val () = subSgn (env', D.empty) topSgn' topSgn