diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2008-11-01 10:47:10 -0400 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2008-11-01 10:47:10 -0400 |
| commit | 89f97891a33b5c0a8971d3508059a139a8815091 (patch) | |
| tree | a11a164b5f4671f27a3e77a5346b4e981e35b801 /src/source.sml | |
| parent | 389aae9254a3bdee3e79bb75b7355de270f2e8dd (diff) | |
Parsing 'let'
Diffstat (limited to 'src/source.sml')
| -rw-r--r-- | src/source.sml | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/source.sml b/src/source.sml index 386b1a83..7e204390 100644 --- a/src/source.sml +++ b/src/source.sml @@ -131,7 +131,14 @@ datatype exp' = | ECase of exp * (pat * exp) list + | ELet of edecl list * exp + +and edecl' = + EDVal of string * con option * exp + | EDValRec of (string * con option * exp) list + withtype exp = exp' located +and edecl = edecl' located datatype decl' = DCon of string * kind option * con |