Mercurial > urweb

diff src/unnest.sml @ 1017:34ba25d6af3b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Inlining threshold for Mono_reduce
author Adam Chlipala <adamc@hcoop.net>
date Sun, 25 Oct 2009 12:48:50 -0400
parents 78504d97410b
children b2311dfb3158
line wrap: on
line diff
--- a/src/unnest.sml	Sun Oct 25 12:08:21 2009 -0400
+++ b/src/unnest.sml	Sun Oct 25 12:48:50 2009 -0400
@@ -339,7 +339,7 @@
                                                   (*Print.prefaces "Have a vi"
                                                                  [("x", Print.PD.string x),
                                                                   ("e", ElabPrint.p_exp ElabEnv.empty e)];*)
-                                                  (x, n, t, e)
+                                                  ("$" ^ x, n, t, e)
                                               end)
                                           vis