K1.Make
module H : Hashtbl.HashedType
type key = H.t
val create : int -> 'a t
val clear : 'a t -> unit
val reset : 'a t -> unit
val length : 'a t -> int
val stats : 'a t -> Hashtbl.statistics
val clean : 'a t -> unit
val stats_alive : 'a t -> Hashtbl.statistics