Mercurial > urweb

diff src/cjr.sml @ 168:25b169416ea8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Storing datatype constructors in type references past monoize
author Adam Chlipala <adamc@hcoop.net>
date Tue, 29 Jul 2008 15:43:17 -0400
parents a991431b77eb
children 31dfab1d4050
line wrap: on
line diff
--- a/src/cjr.sml	Tue Jul 29 15:25:42 2008 -0400
+++ b/src/cjr.sml	Tue Jul 29 15:43:17 2008 -0400
@@ -33,7 +33,7 @@
          TTop
        | TFun of typ * typ
        | TRecord of int
-       | TDatatype of int
+       | TDatatype of int * (string * int * typ option) list
        | TFfi of string * string
 
 withtype typ = typ' located