Mercurial > urweb

diff src/monoize.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 5891f47d7cff
children 588b9d16b00a
line wrap: on
line diff
--- a/src/monoize.sml	Sat Feb 21 14:10:06 2009 -0500
+++ b/src/monoize.sml	Sat Feb 21 15:33:20 2009 -0500
@@ -206,7 +206,7 @@
 
                   | L.CRecord _ => poly ()
                   | L.CConcat _ => poly ()
-                  | L.CFold _ => poly ()
+                  | L.CMap _ => poly ()
                   | L.CUnit => poly ()
 
                   | L.CTuple _ => poly ()