summaryrefslogtreecommitdiff
path: root/src/source_print.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-06-26 11:09:30 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-06-26 11:09:30 -0400
commit77790187bb1c1e0de956d4bbc7795678fb0c6544 (patch)
treed748a92db1c3c4b8466e6cd0728b7cf93832a84c /src/source_print.sml
parent1d4b2683a02155a474d79436247d8a1d293237ae (diff)
Elaborate efold
Diffstat (limited to 'src/source_print.sml')
-rw-r--r--src/source_print.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/source_print.sml b/src/source_print.sml
index b4496a7a..aa880e08 100644
--- a/src/source_print.sml
+++ b/src/source_print.sml
@@ -201,7 +201,7 @@ fun p_exp' par (e, _) =
| EField (e, c) => box [p_exp' true e,
string ".",
p_con' true c]
-
+ | EFold => string "fold"
and p_exp e = p_exp' false e