Mercurial > urweb

diff src/mono_env.sig @ 178:eb3f9913bf31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First part of getting cases through monoize
author Adam Chlipala <adamc@hcoop.net>
date Sun, 03 Aug 2008 09:26:49 -0400
parents 25b169416ea8
children 3bbed533fbd2
line wrap: on
line diff
--- a/src/mono_env.sig	Sat Aug 02 11:15:32 2008 -0400
+++ b/src/mono_env.sig	Sun Aug 03 09:26:49 2008 -0400
@@ -37,6 +37,8 @@
     val pushDatatype : env -> string -> int -> (string * int * Mono.typ option) list -> env
     val lookupDatatype : env -> int -> string * (string * int * Mono.typ option) list
 
+    val lookupConstructor : env -> int -> string * Mono.typ option * int
+
     val pushERel : env -> string -> Mono.typ -> env
     val lookupERel : env -> int -> string * Mono.typ