?size:int ->
unit ->
object
  val current : ('a, 'b) Hashtbl.t
  method add : 'a -> 'b -> unit
  method add_list : ('a * 'b) list -> unit
  method bound : 'a -> bool
  method get : ('a, 'b) Hashtbl.t
  method lookup : 'a -> 'b list
  method lookup_or_fail : 'a -> 'b list
  method mem : 'a -> 'b -> bool
  method memq : 'a -> 'b -> bool
  method remove : ?all:bool -> 'a -> unit
  method remove_key_value : 'a -> 'b -> unit
  method remove_key_value_or_fail : 'a -> 'b -> unit
  method replace : 'a -> 'b -> unit
  method to_list : ('a * 'b) list
end