Mercurial > urweb

diff src/source.sml @ 707:d8217b4cb617

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
PRIMARY KEY
author Adam Chlipala <adamc@hcoop.net>
date Tue, 07 Apr 2009 16:14:31 -0400
parents 1fb318c17546
children f152f215a02c
line wrap: on
line diff
--- a/src/source.sml	Tue Apr 07 15:04:07 2009 -0400
+++ b/src/source.sml	Tue Apr 07 16:14:31 2009 -0400
@@ -88,7 +88,7 @@
        | SgiDatatype of string * string list * (string * con option) list
        | SgiDatatypeImp of string * string list * string
        | SgiVal of string * con
-       | SgiTable of string * con * exp
+       | SgiTable of string * con * exp * exp
        | SgiStr of string * sgn
        | SgiSgn of string * sgn
        | SgiInclude of sgn
@@ -146,8 +146,6 @@
 and exp = exp' located
 and edecl = edecl' located
 
-
-
 datatype decl' =
          DCon of string * kind option * con
        | DDatatype of string * string list * (string * con option) list
@@ -161,7 +159,7 @@
        | DConstraint of con * con
        | DOpenConstraints of string * string list
        | DExport of str
-       | DTable of string * con * exp
+       | DTable of string * con * exp * exp
        | DSequence of string
        | DClass of string * kind * con
        | DDatabase of string