?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
  method mem : 'a -> 'b -> bool
  method memq : 'a -> 'b -> bool
  method remove : 'a -> unit
  method replace : 'a -> 'b -> unit
  method to_list : ('a * 'b) list
end