Mercurial > urweb

diff src/monoize.sml @ 493:ae03d09043c1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add CutMulti
author Adam Chlipala <adamc@hcoop.net>
date Tue, 11 Nov 2008 19:20:37 -0500
parents 366676f7bc88
children 4154b4dc62c6
line wrap: on
line diff
--- a/src/monoize.sml	Tue Nov 11 18:39:38 2008 -0500
+++ b/src/monoize.sml	Tue Nov 11 19:20:37 2008 -0500
@@ -2014,6 +2014,7 @@
             end
           | L.EConcat _ => poly ()
           | L.ECut _ => poly ()
+          | L.ECutMulti _ => poly ()
           | L.EFold _ => poly ()
 
           | L.ECase (e, pes, {disc, result}) =>