summaryrefslogtreecommitdiff
path: root/src/source_print.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-06-08 12:27:08 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-06-08 12:27:08 -0400
commit32115a531d5ed6cafa25dc7d3b88c2679e5142a5 (patch)
tree17f75e04d2559dc15a0f184c1c7da266de8a5a16 /src/source_print.sml
parentc060d15003e3435d4d4c770d8f109f756db13ef5 (diff)
Primitive type constants
Diffstat (limited to 'src/source_print.sml')
-rw-r--r--src/source_print.sml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/source_print.sml b/src/source_print.sml
index de9e2c7c..3db15ec6 100644
--- a/src/source_print.sml
+++ b/src/source_print.sml
@@ -131,6 +131,7 @@ fun p_exp' par (e, _) =
p_con t,
string ")"]
+ | EPrim p => Prim.p_t p
| EVar s => string s
| EApp (e1, e2) => parenIf par (box [p_exp e1,
space,