Mercurial > urweb
comparison src/mono_env.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 | eb3f9913bf31 |
comparison
equal
deleted
inserted
replaced
167:2be573fec9a6 | 168:25b169416ea8 |
---|---|
32 val empty : env | 32 val empty : env |
33 | 33 |
34 exception UnboundRel of int | 34 exception UnboundRel of int |
35 exception UnboundNamed of int | 35 exception UnboundNamed of int |
36 | 36 |
37 val pushTNamed : env -> string -> int -> Mono.typ option -> env | 37 val pushDatatype : env -> string -> int -> (string * int * Mono.typ option) list -> env |
38 val lookupTNamed : env -> int -> string * Mono.typ option | 38 val lookupDatatype : env -> int -> string * (string * int * Mono.typ option) list |
39 | 39 |
40 val pushERel : env -> string -> Mono.typ -> env | 40 val pushERel : env -> string -> Mono.typ -> env |
41 val lookupERel : env -> int -> string * Mono.typ | 41 val lookupERel : env -> int -> string * Mono.typ |
42 | 42 |
43 val pushENamed : env -> string -> int -> Mono.typ -> Mono.exp option -> string -> env | 43 val pushENamed : env -> string -> int -> Mono.typ -> Mono.exp option -> string -> env |