diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-03-28 17:34:57 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-03-28 17:34:57 -0400 |
| commit | e9b1040a1f27a07afc7b2bf33522b1058163bf2b (patch) | |
| tree | 07693c3eaedb3b11fb52fdfa8bcf8cc7c8aaecf8 /src/elab.sml | |
| parent | a6d534b172ccb8eadc24e0e903b196085869800e (diff) | |
Fun with records
Diffstat (limited to 'src/elab.sml')
| -rw-r--r-- | src/elab.sml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/elab.sml b/src/elab.sml index a289d633..b08d9a6c 100644 --- a/src/elab.sml +++ b/src/elab.sml @@ -72,6 +72,9 @@ datatype exp' = | 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 |