BatHashtbl

`sig
type ('a, 'b) t = ('a, 'b) Hashtbl.t
val create : int -> ('a, 'b) BatHashtbl.t
val length : ('a, 'b) BatHashtbl.t -> int
val is_empty : ('a, 'b) BatHashtbl.t -> bool
val add : ('a, 'b) BatHashtbl.t -> 'a -> 'b -> unit
val remove : ('a, 'b) BatHashtbl.t -> 'a -> unit
val remove_all : ('a, 'b) BatHashtbl.t -> 'a -> unit
val replace : ('a, 'b) BatHashtbl.t -> 'a -> 'b -> unit
val copy : ('a, 'b) BatHashtbl.t -> ('a, 'b) BatHashtbl.t
val clear : ('a, 'b) BatHashtbl.t -> unit
val keys : ('a, 'b) BatHashtbl.t -> 'a BatEnum.t
val values : ('a, 'b) BatHashtbl.t -> 'b BatEnum.t
val enum : ('a, 'b) BatHashtbl.t -> ('a * 'b) BatEnum.t
val of_enum : ('a * 'b) BatEnum.t -> ('a, 'b) BatHashtbl.t
val find : ('a, 'b) BatHashtbl.t -> 'a -> 'b
val find_all : ('a, 'b) BatHashtbl.t -> 'a -> 'b list
val find_default : ('a, 'b) BatHashtbl.t -> 'a -> 'b -> 'b
val find_option : ('a, 'b) Hashtbl.t -> 'a -> 'b option
val mem : ('a, 'b) BatHashtbl.t -> 'a -> bool
val iter : ('a -> 'b -> unit) -> ('a, 'b) BatHashtbl.t -> unit
val fold : ('a -> 'b -> 'c -> 'c) -> ('a, 'b) BatHashtbl.t -> 'c -> 'c
val map :
('a -> 'b -> 'c) -> ('a, 'b) BatHashtbl.t -> ('a, 'c) BatHashtbl.t
val filter : ('a -> bool) -> ('b, 'a) BatHashtbl.t -> ('b, 'a) BatHashtbl.t
val filteri :
('a -> 'b -> bool) -> ('a, 'b) BatHashtbl.t -> ('a, 'b) BatHashtbl.t
val filter_map :
('a -> 'b -> 'c option) -> ('a, 'b) BatHashtbl.t -> ('a, 'c) BatHashtbl.t
val hash : 'a -> int
external hash_param : int -> int -> 'a -> int = "caml_hash_univ_param"
"noalloc"
val print :
?first:string ->
?last:string ->
?sep:string ->
('a BatInnerIO.output -> 'b -> unit) ->
('a BatInnerIO.output -> 'c -> unit) ->
'a BatInnerIO.output -> ('b, 'c) BatHashtbl.t -> unit
module Exceptionless :
sig val find : ('a, 'b) BatHashtbl.t -> 'a -> 'b option end
module Infix :
sig
val ( --> ) : ('a, 'b) BatHashtbl.t -> 'a -> 'b
val ( <-- ) : ('a, 'b) BatHashtbl.t -> 'a * 'b -> unit
end
module Labels :
sig
val add : ('a, 'b) BatHashtbl.t -> key:'a -> data:'b -> unit
val replace : ('a, 'b) BatHashtbl.t -> key:'a -> data:'b -> unit
val iter :
f:(key:'a -> data:'b -> unit) -> ('a, 'b) BatHashtbl.t -> unit
val map :
f:(key:'a -> data:'b -> 'c) ->
('a, 'b) BatHashtbl.t -> ('a, 'c) BatHashtbl.t
val filter :
f:('a -> bool) -> ('b, 'a) BatHashtbl.t -> ('b, 'a) BatHashtbl.t
val filteri :
f:(key:'a -> data:'b -> bool) ->
('a, 'b) BatHashtbl.t -> ('a, 'b) BatHashtbl.t
val filter_map :
f:(key:'a -> data:'b -> 'c option) ->
('a, 'b) BatHashtbl.t -> ('a, 'c) BatHashtbl.t
val fold :
f:(key:'a -> data:'b -> 'c -> 'c) ->
('a, 'b) BatHashtbl.t -> init:'c -> 'c
end
module type HashedType =
sig
type t
val equal : BatHashtbl.HashedType.t -> BatHashtbl.HashedType.t -> bool
val hash : BatHashtbl.HashedType.t -> int
end
module type S =
sig
type key
type 'a t
val create : int -> 'a BatHashtbl.S.t
val length : 'a BatHashtbl.S.t -> int
val is_empty : 'a BatHashtbl.S.t -> bool
val clear : 'a BatHashtbl.S.t -> unit
val copy : 'a BatHashtbl.S.t -> 'a BatHashtbl.S.t
val add : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a -> unit
val remove : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> unit
val remove_all : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> unit
val find : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a
val find_all : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a list
val find_default : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a -> 'a
val find_option : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a option
val replace : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a -> unit
val mem : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> bool
val iter :
(BatHashtbl.S.key -> 'a -> unit) -> 'a BatHashtbl.S.t -> unit
val fold :
(BatHashtbl.S.key -> 'a -> 'b -> 'b) -> 'a BatHashtbl.S.t -> 'b -> 'b
val map :
(BatHashtbl.S.key -> 'a -> 'b) ->
'a BatHashtbl.S.t -> 'b BatHashtbl.S.t
val filter : ('a -> bool) -> 'a BatHashtbl.S.t -> 'a BatHashtbl.S.t
val filteri :
(BatHashtbl.S.key -> 'a -> bool) ->
'a BatHashtbl.S.t -> 'a BatHashtbl.S.t
val filter_map :
(BatHashtbl.S.key -> 'a -> 'b option) ->
'a BatHashtbl.S.t -> 'b BatHashtbl.S.t
val keys : 'a BatHashtbl.S.t -> BatHashtbl.S.key BatEnum.t
val values : 'a BatHashtbl.S.t -> 'a BatEnum.t
val enum : 'a BatHashtbl.S.t -> (BatHashtbl.S.key * 'a) BatEnum.t
val of_enum : (BatHashtbl.S.key * 'a) BatEnum.t -> 'a BatHashtbl.S.t
val print :
?first:string ->
?last:string ->
?sep:string ->
('a BatInnerIO.output -> BatHashtbl.S.key -> unit) ->
('a BatInnerIO.output -> 'b -> unit) ->
'a BatInnerIO.output -> 'b BatHashtbl.S.t -> unit
module Exceptionless :
sig val find : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a option end
module Infix :
sig
val ( --> ) : 'a BatHashtbl.S.t -> BatHashtbl.S.key -> 'a
val ( <-- ) : 'a BatHashtbl.S.t -> BatHashtbl.S.key * 'a -> unit
end
module Labels :
sig
val add :
'a BatHashtbl.S.t -> key:BatHashtbl.S.key -> data:'a -> unit
val replace :
'a BatHashtbl.S.t -> key:BatHashtbl.S.key -> data:'a -> unit
val iter :
f:(key:BatHashtbl.S.key -> data:'a -> unit) ->
'a BatHashtbl.S.t -> unit
val map :
f:(key:BatHashtbl.S.key -> data:'a -> 'b) ->
'a BatHashtbl.S.t -> 'b BatHashtbl.S.t
val filter :
f:('a -> bool) -> 'a BatHashtbl.S.t -> 'a BatHashtbl.S.t
val filteri :
f:(key:BatHashtbl.S.key -> data:'a -> bool) ->
'a BatHashtbl.S.t -> 'a BatHashtbl.S.t
val filter_map :
f:(key:BatHashtbl.S.key -> data:'a -> 'b option) ->
'a BatHashtbl.S.t -> 'b BatHashtbl.S.t
val fold :
f:(key:BatHashtbl.S.key -> data:'a -> 'b -> 'b) ->
'a BatHashtbl.S.t -> init:'b -> 'b
end
end
module Make :
functor (H : HashedType) ->
sig
type key = H.t
type 'a t
val create : int -> 'a t
val length : 'a t -> int
val is_empty : 'a t -> bool
val clear : 'a t -> unit
val copy : 'a t -> 'a t
val add : 'a t -> key -> 'a -> unit
val remove : 'a t -> key -> unit
val remove_all : 'a t -> key -> unit
val find : 'a t -> key -> 'a
val find_all : 'a t -> key -> 'a list
val find_default : 'a t -> key -> 'a -> 'a
val find_option : 'a t -> key -> 'a option
val replace : 'a t -> key -> 'a -> unit
val mem : 'a t -> key -> bool
val iter : (key -> 'a -> unit) -> 'a t -> unit
val fold : (key -> 'a -> 'b -> 'b) -> 'a t -> 'b -> 'b
val map : (key -> 'a -> 'b) -> 'a t -> 'b t
val filter : ('a -> bool) -> 'a t -> 'a t
val filteri : (key -> 'a -> bool) -> 'a t -> 'a t
val filter_map : (key -> 'a -> 'b option) -> 'a t -> 'b t
val keys : 'a t -> key BatEnum.t
val values : 'a t -> 'a BatEnum.t
val enum : 'a t -> (key * 'a) BatEnum.t
val of_enum : (key * 'a) BatEnum.t -> 'a t
val print :
?first:string ->
?last:string ->
?sep:string ->
('a BatInnerIO.output -> key -> unit) ->
('a BatInnerIO.output -> 'b -> unit) ->
'a BatInnerIO.output -> 'b t -> unit
module Exceptionless : sig val find : 'a t -> key -> 'a option end
module Infix :
sig
val ( --> ) : 'a t -> key -> 'a
val ( <-- ) : 'a t -> key * 'a -> unit
end
module Labels :
sig
val add : 'a t -> key:key -> data:'a -> unit
val replace : 'a t -> key:key -> data:'a -> unit
val iter : f:(key:key -> data:'a -> unit) -> 'a t -> unit
val map : f:(key:key -> data:'a -> 'b) -> 'a t -> 'b t
val filter : f:('a -> bool) -> 'a t -> 'a t
val filteri : f:(key:key -> data:'a -> bool) -> 'a t -> 'a t
val filter_map :
f:(key:key -> data:'a -> 'b option) -> 'a t -> 'b t
val fold :
f:(key:key -> data:'a -> 'b -> 'b) -> 'a t -> init:'b -> 'b
end
end
module Cap :
sig
type ('a, 'b, 'c) t constraint 'c = [< `Read | `Write ]
val create : int -> ('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t
external of_table :
('a, 'b) Hashtbl.t -> ('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t
= "%identity"
external to_table :
('a, 'b, [ `Read | `Write ]) BatHashtbl.Cap.t -> ('a, 'b) Hashtbl.t
= "%identity"
external read_only :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('a, 'b, [ `Read ]) BatHashtbl.Cap.t = "%identity"
external write_only :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t ->
('a, 'b, [ `Write ]) BatHashtbl.Cap.t = "%identity"
val length : ('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t -> int
val is_empty : ('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t -> bool
val add :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t ->
'a -> 'b -> unit
val remove :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t -> 'a -> unit
val remove_all :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t -> 'a -> unit
val replace :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t ->
'a -> 'b -> unit
val copy :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t
val clear :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t -> unit
val find :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t -> 'a -> 'b
val find_all :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
'a -> 'b list
val find_default :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
'a -> 'b -> 'b
val find_option :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
'a -> 'b option
val mem :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t -> 'a -> bool
val iter :
('a -> 'b -> unit) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t -> unit
val fold :
('a -> 'b -> 'c -> 'c) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t -> 'c -> 'c
val map :
('a -> 'b -> 'c) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('a, 'c, [< `Read | `Write ]) BatHashtbl.Cap.t
val filter :
('a -> bool) ->
('b, 'a, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('b, 'a, [< `Read | `Write ]) BatHashtbl.Cap.t
val filteri :
('a -> 'b -> bool) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t
val filter_map :
('a -> 'b -> 'c option) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('a, 'c, [< `Read | `Write ]) BatHashtbl.Cap.t
val keys :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
'a BatEnum.t
val values :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
'b BatEnum.t
val enum :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
('a * 'b) BatEnum.t
val of_enum :
('a * 'b) BatEnum.t -> ('a, 'b, [< `Read | `Write ]) BatHashtbl.Cap.t
val print :
?first:string ->
?last:string ->
?sep:string ->
('a BatInnerIO.output -> 'b -> unit) ->
('a BatInnerIO.output -> 'c -> unit) ->
'a BatInnerIO.output ->
('b, 'c, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t -> unit
module Exceptionless :
sig
val find :
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
'a -> 'b option
end
module Labels :
sig
val add :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t ->
key:'a -> data:'b -> unit
val replace :
('a, 'b, [< `Read | `Write > `Write ]) BatHashtbl.Cap.t ->
key:'a -> data:'b -> unit
val iter :
f:(key:'a -> data:'b -> unit) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t -> unit
val fold :
f:(key:'a -> data:'b -> 'c -> 'c) ->
('a, 'b, [< `Read | `Write > `Read ]) BatHashtbl.Cap.t ->
init:'c -> 'c
end
end
end`