Mercurial > urweb

diff src/source_print.sml @ 14:f1c36df29ed7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Primitive type constants
author Adam Chlipala <adamc@hcoop.net>
date Sun, 08 Jun 2008 12:27:08 -0400
parents d89477f07c1e
children 9a578171de9e
line wrap: on
line diff
--- a/src/source_print.sml	Sun Jun 08 11:32:48 2008 -0400
+++ b/src/source_print.sml	Sun Jun 08 12:27:08 2008 -0400
@@ -131,6 +131,7 @@
                               p_con t,
                               string ")"]        
 
+      | EPrim p => Prim.p_t p
       | EVar s => string s
       | EApp (e1, e2) => parenIf par (box [p_exp e1,
                                            space,