Mercurial > urweb

diff src/source.sml @ 623:588b9d16b00a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Start of kind polymorphism, up to the point where demo/hello elaborates with updated Basis/Top
author Adam Chlipala <adamc@hcoop.net>
date Sun, 22 Feb 2009 16:10:25 -0500
parents 8998114760c1
children 12b73f3c108e
line wrap: on
line diff
--- a/src/source.sml	Sat Feb 21 16:11:56 2009 -0500
+++ b/src/source.sml	Sun Feb 22 16:10:25 2009 -0500
@@ -38,6 +38,9 @@
        | KTuple of kind list
        | KWild
 
+       | KFun of string * kind
+       | KVar of string
+
 withtype kind = kind' located
 
 datatype explicitness =
@@ -56,6 +59,9 @@
        | CAbs of string * kind option * con
        | CDisjoint of con * con * con
 
+       | CKAbs of string * con
+       | TKFun of string * con
+
        | CName of string
 
        | CRecord of (con * con) list
@@ -119,12 +125,13 @@
        | ECAbs of explicitness * string * kind * exp
        | EDisjoint of con * con * exp
 
+       | EKAbs of string * exp
+
        | ERecord of (con * exp) list
        | EField of exp * con
        | EConcat of exp * exp
        | ECut of exp * con
        | ECutMulti of exp * con
-       | EFold
 
        | EWild