Mercurial > urweb

comparison src/expl.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 d34834af4512
children 8998114760c1
comparison
equal deleted inserted replaced
492:4a241d108a2c 493:ae03d09043c1
90 90
91 | ERecord of (con * exp * con) list 91 | ERecord of (con * exp * con) list
92 | EField of exp * con * { field : con, rest : con } 92 | EField of exp * con * { field : con, rest : con }
93 | EConcat of exp * con * exp * con 93 | EConcat of exp * con * exp * con
94 | ECut of exp * con * { field : con, rest : con } 94 | ECut of exp * con * { field : con, rest : con }
95 | ECutMulti of exp * con * { rest : con }
95 | EFold of kind 96 | EFold of kind
96 97
97 | ECase of exp * (pat * exp) list * { disc : con, result : con } 98 | ECase of exp * (pat * exp) list * { disc : con, result : con }
98 99
99 | EWrite of exp 100 | EWrite of exp