Mercurial > urweb

comparison 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
comparison
equal deleted inserted replaced
177:5d030ee143e2 178:eb3f9913bf31
35 exception UnboundNamed of int 35 exception UnboundNamed of int
36 36
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
41
40 val pushERel : env -> string -> Mono.typ -> env 42 val pushERel : env -> string -> Mono.typ -> env
41 val lookupERel : env -> int -> string * Mono.typ 43 val lookupERel : env -> int -> string * Mono.typ
42 44
43 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
44 val lookupENamed : env -> int -> string * Mono.typ * Mono.exp option * string 46 val lookupENamed : env -> int -> string * Mono.typ * Mono.exp option * string