Mercurial > urweb

diff src/monoize.sml @ 468:4efab85405be

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Ensql'ing nullables
author Adam Chlipala <adamc@hcoop.net>
date Thu, 06 Nov 2008 15:52:13 -0500
parents 3f1b9231a37b
children 7cb418e9714f
line wrap: on
line diff
--- a/src/monoize.sml	Thu Nov 06 15:37:38 2008 -0500
+++ b/src/monoize.sml	Thu Nov 06 15:52:13 2008 -0500
@@ -983,7 +983,7 @@
             let
                 val (e, fm) = monoExp (env, st, fm) e
             in
-                ((L'.EDml (liftExpInExp 0 e), loc),
+                ((L'.EDml e, loc),
                  fm)
             end