sig
  type 'a t
  type key
  val find : 'Exthtbl.Private.t -> Exthtbl.Private.key -> 'a
  val find_def : 'Exthtbl.Private.t -> '-> Exthtbl.Private.key -> 'a
  val find_opt : 'Exthtbl.Private.t -> Exthtbl.Private.key -> 'a option
  val find_exn : 'Exthtbl.Private.t -> exn -> Exthtbl.Private.key -> 'a
  val map :
    (Exthtbl.Private.key -> '-> 'b) ->
    'Exthtbl.Private.t -> 'Exthtbl.Private.t
  val iter :
    (Exthtbl.Private.key -> '-> unit) -> 'Exthtbl.Private.t -> unit
  val fold :
    (Exthtbl.Private.key -> '-> 'acc -> 'acc) ->
    'Exthtbl.Private.t -> 'acc -> 'acc
  val mem : 'Exthtbl.Private.t -> Exthtbl.Private.key -> bool
  val length : 'Exthtbl.Private.t -> int
  val is_empty : 'Exthtbl.Private.t -> bool
end