sig   type ('k, 'd) t   val create : int -> ('k, 'd) Ephemeron.Kn.t   val get_key : ('k, 'd) Ephemeron.Kn.t -> int -> 'k option   val get_key_copy : ('k, 'd) Ephemeron.Kn.t -> int -> 'k option   val set_key : ('k, 'd) Ephemeron.Kn.t -> int -> '-> unit   val unset_key : ('k, 'd) Ephemeron.Kn.t -> int -> unit   val check_key : ('k, 'd) Ephemeron.Kn.t -> int -> bool   val blit_key :     ('k, 'a) Ephemeron.Kn.t ->     int -> ('k, 'b) Ephemeron.Kn.t -> int -> int -> unit   val get_data : ('k, 'd) Ephemeron.Kn.t -> 'd option   val get_data_copy : ('k, 'd) Ephemeron.Kn.t -> 'd option   val set_data : ('k, 'd) Ephemeron.Kn.t -> '-> unit   val unset_data : ('k, 'd) Ephemeron.Kn.t -> unit   val check_data : ('k, 'd) Ephemeron.Kn.t -> bool   val blit_data : ('k, 'd) Ephemeron.Kn.t -> ('k, 'd) Ephemeron.Kn.t -> unit   module Make :     functor (H : Hashtbl.HashedType->       sig         type key = H.t array         type 'a t         val create : int -> 'a t         val clear : 'a t -> unit         val reset : 'a t -> unit         val copy : 'a t -> 'a t         val add : 'a t -> key -> '-> unit         val remove : 'a t -> key -> unit         val find : 'a t -> key -> 'a         val find_all : 'a t -> key -> 'a list         val replace : 'a t -> key -> '-> unit         val mem : 'a t -> key -> bool         val iter : (key -> '-> unit) -> 'a t -> unit         val filter_map_inplace : (key -> '-> 'a option) -> 'a t -> unit         val fold : (key -> '-> '-> 'b) -> 'a t -> '-> 'b         val length : 'a t -> int         val stats : 'a t -> Hashtbl.statistics         val clean : 'a t -> unit         val stats_alive : 'a t -> Hashtbl.statistics       end   module MakeSeeded :     functor (H : Hashtbl.SeededHashedType->       sig         type key = H.t array         type 'a t         val create : ?random:bool -> int -> 'a t         val clear : 'a t -> unit         val reset : 'a t -> unit         val copy : 'a t -> 'a t         val add : 'a t -> key -> '-> unit         val remove : 'a t -> key -> unit         val find : 'a t -> key -> 'a         val find_all : 'a t -> key -> 'a list         val replace : 'a t -> key -> '-> unit         val mem : 'a t -> key -> bool         val iter : (key -> '-> unit) -> 'a t -> unit         val filter_map_inplace : (key -> '-> 'a option) -> 'a t -> unit         val fold : (key -> '-> '-> 'b) -> 'a t -> '-> 'b         val length : 'a t -> int         val stats : 'a t -> Hashtbl.statistics         val clean : 'a t -> unit         val stats_alive : 'a t -> Hashtbl.statistics       end end