Mercurial > urweb
comparison src/source.sml @ 563:44958d74c43f
Initial conversion to arbitrary-kind classes
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Fri, 19 Dec 2008 10:03:31 -0500 |
parents | ae03d09043c1 |
children | 8998114760c1 |
comparison
equal
deleted
inserted
replaced
562:6daa59a55c43 | 563:44958d74c43f |
---|---|
79 | SgiVal of string * con | 79 | SgiVal of string * con |
80 | SgiStr of string * sgn | 80 | SgiStr of string * sgn |
81 | SgiSgn of string * sgn | 81 | SgiSgn of string * sgn |
82 | SgiInclude of sgn | 82 | SgiInclude of sgn |
83 | SgiConstraint of con * con | 83 | SgiConstraint of con * con |
84 | SgiClassAbs of string | 84 | SgiClassAbs of string * kind |
85 | SgiClass of string * con | 85 | SgiClass of string * kind * con |
86 | 86 |
87 and sgn' = | 87 and sgn' = |
88 SgnConst of sgn_item list | 88 SgnConst of sgn_item list |
89 | SgnVar of string | 89 | SgnVar of string |
90 | SgnFun of string * sgn * sgn | 90 | SgnFun of string * sgn * sgn |
152 | DConstraint of con * con | 152 | DConstraint of con * con |
153 | DOpenConstraints of string * string list | 153 | DOpenConstraints of string * string list |
154 | DExport of str | 154 | DExport of str |
155 | DTable of string * con | 155 | DTable of string * con |
156 | DSequence of string | 156 | DSequence of string |
157 | DClass of string * con | 157 | DClass of string * kind * con |
158 | DDatabase of string | 158 | DDatabase of string |
159 | DCookie of string * con | 159 | DCookie of string * con |
160 | 160 |
161 and str' = | 161 and str' = |
162 StrConst of decl list | 162 StrConst of decl list |