summaryrefslogtreecommitdiff
path: root/src/expl.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-08-16 14:45:23 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-08-16 14:45:23 -0400
commite9456cb231725d65a9cdd11dc3d4549fe7254e06 (patch)
treed2582b97f013e5759f2c0aa3f9bc030b74e92991 /src/expl.sml
parent70cd2b655dd741ad04a98dbe6685ec2ec9e11fdd (diff)
Explifying type classes
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