Module Make_1.With_debug

Parameters

Signature

val to_map : bucket -> int Kv_hash__.Util.Map_i.t

val kvs_to_map : (Kv_hash__.Util.Map_i.key * 'a) list -> 'a Kv_hash__.Util.Map_i.t

val insert : bucket -> Kv_hash__.Util.Map_i.key -> Kv_hash__.Util.Map_i.key -> [ `Ok | `Split of (Kv_hash__.Util.Map_i.key * Kv_hash__.Util.Map_i.key) Base.List.t * Kv_hash__.Util.Map_i.key * (Kv_hash__.Util.Map_i.key * Kv_hash__.Util.Map_i.key) Base.List.t ]

val find : bucket -> Kv_hash__.Util.Map_i.key -> int option