Up

Module Hashtbl2 = Hashtbl2

Signature

module type Key = sig .. end
type ('key1, 'key2, 'data) t
val sexp_of_t : ('key1 -> Sexplib.Sexp.t) -> ('key2 -> Sexplib.Sexp.t) -> ('data -> Sexplib.Sexp.t) -> ('key1, 'key2, 'data) t -> Sexplib.Sexp.t
include Core.Std.Invariant.S3 with type ('a, 'b, 'c) t := ('a, 'b, 'c) t
type ('a, 'b, 'c) t
val invariant : 'a Invariant_intf.inv -> 'b Invariant_intf.inv -> 'c Invariant_intf.inv -> ('a, 'b, 'c) t Invariant_intf.inv
val clear : (_, _, _) t -> unit
val add_exn : ('key1, 'key2, 'data) t -> 'key1 -> 'key2 -> 'data -> unit
val set : ('key1, 'key2, 'data) t -> 'key1 -> 'key2 -> 'data -> unit
val remove_exn : ('key1, 'key2, 'data) t -> 'key1 -> 'key2 -> unit
val remove_all1 : ('key1, 'key2, 'data) t -> 'key1 -> unit
val find : ('key1, 'key2, 'data) t -> 'key1 -> 'key2 -> 'data option
val find1 : ('key1, 'key2, 'data) t -> 'key1 -> ('key2, 'data) Core.Std.Hashtbl.t option
val mem1 : ('key1, 'key2, 'data) t -> 'key1 -> bool

mem1 t key1 is true iff \exists key2 s.t. find t key1 key2 is not None *

val iter : ('key1, 'key2, 'data) t -> f:('key1 -> 'key2 -> 'data -> unit) -> unit
val iter1 : ('key1, 'key2, 'data) t -> f:('key1 -> ('key2, 'data) Core.Std.Hashtbl.t -> unit) -> unit
val iter_key2 : ('key1, 'key2, 'data) t -> 'key1 -> f:('key2 -> 'data -> unit) -> unit

iter_key2 t key1 ~f is a no-op unless mem1 t key1 *

module Make (Key1 : Key) (Key2 : Key) : sig .. end