Mercurial > urweb

diff src/source_print.sml @ 403:8084fa9216de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New implicit argument handling
author Adam Chlipala <adamc@hcoop.net>
date Tue, 21 Oct 2008 16:41:11 -0400
parents b85e6ba56618
children dfc8c991abd0
line wrap: on
line diff
--- a/src/source_print.sml	Tue Oct 21 15:11:42 2008 -0400
+++ b/src/source_print.sml	Tue Oct 21 16:41:11 2008 -0400
@@ -199,7 +199,7 @@
                               string ")"]        
 
       | EPrim p => Prim.p_t p
-      | EVar (ss, s) => p_list_sep (string ".") string (ss @ [s])
+      | EVar (ss, s, _) => p_list_sep (string ".") string (ss @ [s])
       | EApp (e1, e2) => parenIf par (box [p_exp e1,
                                            space,
                                            p_exp' true e2])