diff options
author | 2008-11-01 10:47:10 -0400 | |
---|---|---|
committer | 2008-11-01 10:47:10 -0400 | |
commit | 70232ad319a6d86aa1302976919e4c1b126a36f8 (patch) | |
tree | a11a164b5f4671f27a3e77a5346b4e981e35b801 /src/source.sml | |
parent | 4f190e28ca1f36b85cea29ef79b1c9f163779141 (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 |