Mercurial > urweb
diff src/core.sml @ 214:766b5475477f
Corifying con-tuples
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 16 Aug 2008 15:03:05 -0400 |
parents | 9bbf4d383381 |
children | 5c50b17f5e4a |
line wrap: on
line diff
--- a/src/core.sml Sat Aug 16 14:45:23 2008 -0400 +++ b/src/core.sml Sat Aug 16 15:03:05 2008 -0400 @@ -35,6 +35,7 @@ | KName | KRecord of kind | KUnit + | KTuple of kind list withtype kind = kind' located @@ -57,6 +58,9 @@ | CUnit + | CTuple of con list + | CProj of con * int + withtype con = con' located datatype datatype_kind = datatype Elab.datatype_kind