Mercurial > urweb

diff src/elab_print.sml @ 621:8998114760c1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"Hello world" compiles, after replacing type-level fold with map
author Adam Chlipala <adamc@hcoop.net>
date Sat, 21 Feb 2009 15:33:20 -0500
parents 44958d74c43f
children 588b9d16b00a
line wrap: on
line diff
--- a/src/elab_print.sml	Sat Feb 21 14:10:06 2009 -0500
+++ b/src/elab_print.sml	Sat Feb 21 15:33:20 2009 -0500
@@ -167,7 +167,7 @@
                                               string "++",
                                               space,
                                               p_con env c2])
-      | CFold _ => string "fold"
+      | CMap _ => string "map"
 
       | CUnit => string "()"