summaryrefslogtreecommitdiff
path: root/src/elab_print.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-06-26 09:48:54 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-06-26 09:48:54 -0400
commitbef69954307005832dca731aff9a7b008c88c8d8 (patch)
tree801e896f527636ab21211f11839f3c1d20f5ac10 /src/elab_print.sml
parentb03ac1efc8ac5197688a97d1b8b27106654d504d (diff)
Elaborating cfold
Diffstat (limited to 'src/elab_print.sml')
-rw-r--r--src/elab_print.sml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/elab_print.sml b/src/elab_print.sml
index 4c02c495..2b515a03 100644
--- a/src/elab_print.sml
+++ b/src/elab_print.sml
@@ -152,6 +152,7 @@ fun p_con' par env (c, _) =
string "++",
space,
p_con env c2])
+ | CFold _ => string "fold"
| CError => string "<ERROR>"
| CUnif (_, _, ref (SOME c)) => p_con' par env c