Mercurial > urweb

diff src/elab.sml @ 12:d89477f07c1e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fun with records
author Adam Chlipala <adamc@hcoop.net>
date Fri, 28 Mar 2008 17:34:57 -0400
parents 14b533dbe6cc
children f1c36df29ed7
line wrap: on
line diff
--- a/src/elab.sml	Fri Mar 28 15:20:46 2008 -0400
+++ b/src/elab.sml	Fri Mar 28 17:34:57 2008 -0400
@@ -72,6 +72,9 @@
        | ECApp of exp * con
        | ECAbs of explicitness * string * kind * exp
 
+       | ERecord of (con * exp) list
+       | EField of exp * con * { field : con, rest : con }
+
        | EError
 
 withtype exp = exp' located