summaryrefslogtreecommitdiff
path: root/src/expl.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/expl.sml')
-rw-r--r--src/expl.sml4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/expl.sml b/src/expl.sml
index 4ba835ea..0edff46b 100644
--- a/src/expl.sml
+++ b/src/expl.sml
@@ -34,6 +34,7 @@ datatype kind' =
| KArrow of kind * kind
| KName
| KUnit
+ | KTuple of kind list
| KRecord of kind
withtype kind = kind' located
@@ -57,6 +58,9 @@ datatype con' =
| CUnit
+ | CTuple of con list
+ | CProj of con * int
+
withtype con = con' located
datatype datatype_kind = datatype Elab.datatype_kind