diff src/mono_util.sig @ 168:25b169416ea8

Storing datatype constructors in type references past monoize
author Adam Chlipala <adamc@hcoop.net>
date Tue, 29 Jul 2008 15:43:17 -0400
parents 813e5a52063d
children 8e9f97508f0d
line wrap: on
line diff
--- a/src/mono_util.sig	Tue Jul 29 15:25:42 2008 -0400
+++ b/src/mono_util.sig	Tue Jul 29 15:43:17 2008 -0400
@@ -45,7 +45,7 @@
 
 structure Exp : sig
     datatype binder =
-             NamedT of string * int * Mono.typ option
+             Datatype of string * int * (string * int * Mono.typ option) list
            | RelE of string * Mono.typ
            | NamedE of string * int * Mono.typ * Mono.exp option * string