diff options
author | Adam Chlipala <adamc@hcoop.net> | 2008-01-26 17:10:26 -0500 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2008-01-26 17:10:26 -0500 |
commit | c3c7a475626786988f0a367fc3c20f903f3fcbba (patch) | |
tree | 96d21b1114d7bc1ad6bddcdd1cc009f3c8152e9d /src/source.sml | |
parent | 554a00c1e5a61d1a2a2767eb091777fbc2a7b811 (diff) |
Parsing basic expressions
Diffstat (limited to 'src/source.sml')
-rw-r--r-- | src/source.sml | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/src/source.sml b/src/source.sml index c42e8bab..d574141c 100644 --- a/src/source.sml +++ b/src/source.sml @@ -50,7 +50,7 @@ datatype con' = | CVar of string | CApp of con * con - | CAbs of explicitness * string * kind * con + | CAbs of string * kind * con | CName of string @@ -59,8 +59,20 @@ datatype con' = withtype con = con' located +datatype exp' = + EAnnot of exp * con + + | EVar of string + | EApp of exp * exp + | EAbs of string * con option * exp + | ECApp of exp * con + | ECAbs of explicitness * string * kind * exp + +withtype exp = exp' located + datatype decl' = DCon of string * kind option * con + | DVal of string * con option * exp withtype decl = decl' located |