diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-11-01 11:17:29 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-11-01 11:17:29 -0400 |
| commit | 3f497272d327fea2638006c751d812dbbc449c78 (patch) | |
| tree | 60d3ec0e0ab4ba36e8ad9396aad35e05d4725153 /src/elab.sml | |
| parent | 89f97891a33b5c0a8971d3508059a139a8815091 (diff) | |
Elaborating 'let'
Diffstat (limited to 'src/elab.sml')
| -rw-r--r-- | src/elab.sml | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/elab.sml b/src/elab.sml index 4202d367..b5350c2a 100644 --- a/src/elab.sml +++ b/src/elab.sml @@ -117,7 +117,14 @@ datatype exp' = | EError | EUnif of exp option ref + | ELet of edecl list * exp + +and edecl' = + EDVal of string * con * exp + | EDValRec of (string * con * exp) list + withtype exp = exp' located + and edecl = edecl' located datatype sgn_item' = SgiConAbs of string * int * kind |