diff options
author | Adam Chlipala <adamc@hcoop.net> | 2008-08-03 09:26:49 -0400 |
---|---|---|
committer | Adam Chlipala <adamc@hcoop.net> | 2008-08-03 09:26:49 -0400 |
commit | 5e0563d3b00303d5053827e46811c93077455208 (patch) | |
tree | 84de1a0972562b31942273587987b2a27f615d8b /src/mono_env.sig | |
parent | 49c123050b2bc8a24f250fcc0d55e49484bc604c (diff) |
First part of getting cases through monoize
Diffstat (limited to 'src/mono_env.sig')
-rw-r--r-- | src/mono_env.sig | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/mono_env.sig b/src/mono_env.sig index e3ff94b6..5b270799 100644 --- a/src/mono_env.sig +++ b/src/mono_env.sig @@ -37,6 +37,8 @@ signature MONO_ENV = sig 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 |