?size:int -> unit -> object val current : ('a, unit) Hashtbl.t method add : 'a -> unit method mem : 'a -> bool method remove : 'a -> unit end