| 14 |
val get_ns_table : tenv -> Ns.table |
val get_ns_table : tenv -> Ns.table |
| 15 |
|
|
| 16 |
val register_global_types : (U.t * Ast.ppat) list -> unit |
val register_global_types : (U.t * Ast.ppat) list -> unit |
| 17 |
|
val register_global_ns : U.t -> Ns.t -> unit |
| 18 |
val dump_global_types: Format.formatter -> unit |
val dump_global_types: Format.formatter -> unit |
| 19 |
|
val dump_global_ns: Format.formatter -> unit |
|
val register_ns_prefix : U.t -> Ns.t -> unit |
|
| 20 |
|
|
| 21 |
val typ : Ast.ppat -> Typed.ttyp |
val typ : Ast.ppat -> Typed.ttyp |
| 22 |
val pat : Ast.ppat -> Typed.tpat |
val pat : Ast.ppat -> Typed.tpat |