comparison src/mono_env.sig @ 183:c0ea24dcb86f

Optimizing 'case' in Mono_reduce
author Adam Chlipala <adamc@hcoop.net>
date Sun, 03 Aug 2008 13:30:27 -0400
parents 3bbed533fbd2
children 1901db85acb4
comparison
equal deleted inserted replaced
182:d11754ffe252 183:c0ea24dcb86f
37 val pushDatatype : env -> string -> int -> (string * int * Mono.typ option) list -> env 37 val pushDatatype : env -> string -> int -> (string * int * Mono.typ option) list -> env
38 val lookupDatatype : env -> int -> string * (string * int * Mono.typ option) list 38 val lookupDatatype : env -> int -> string * (string * int * Mono.typ option) list
39 39
40 val lookupConstructor : env -> int -> string * Mono.typ option * int 40 val lookupConstructor : env -> int -> string * Mono.typ option * int
41 41
42 val pushERel : env -> string -> Mono.typ -> env 42 val pushERel : env -> string -> Mono.typ -> Mono.exp option -> env
43 val lookupERel : env -> int -> string * Mono.typ 43 val lookupERel : env -> int -> string * Mono.typ * Mono.exp option
44 44
45 val pushENamed : env -> string -> int -> Mono.typ -> Mono.exp option -> string -> env 45 val pushENamed : env -> string -> int -> Mono.typ -> Mono.exp option -> string -> env
46 val lookupENamed : env -> int -> string * Mono.typ * Mono.exp option * string 46 val lookupENamed : env -> int -> string * Mono.typ * Mono.exp option * string
47 47
48 val declBinds : env -> Mono.decl -> env 48 val declBinds : env -> Mono.decl -> env