summaryrefslogtreecommitdiff
path: root/src/source.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-07-01 12:25:12 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-07-01 12:25:12 -0400
commitf7d2bdce780d0333431829a8a788bdb208c0dcbc (patch)
tree5316084519f313741563c016ac6733d03f892475 /src/source.sml
parent7628e1d8f7f8199531c9bc08a774c9a9e2bc5d63 (diff)
Disjointness assumptions in expressions
Diffstat (limited to 'src/source.sml')
-rw-r--r--src/source.sml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/source.sml b/src/source.sml
index 10d174ab..0b168dd0 100644
--- a/src/source.sml
+++ b/src/source.sml
@@ -48,6 +48,7 @@ datatype con' =
| TFun of con * con
| TCFun of explicitness * string * kind * con
+ | TDisjoint of con * con * con
| TRecord of con
| CVar of string list * string
@@ -94,6 +95,7 @@ datatype exp' =
| EAbs of string * con option * exp
| ECApp of exp * con
| ECAbs of explicitness * string * kind * exp
+ | EDisjoint of con * con * exp
| ERecord of (con * exp) list
| EField of exp * con