?trace:bool -> ?size:int -> unit -> object val current : ('a, 'b) Hashtbl.t val trace : bool method get : ('a -> 'b) -> 'a -> 'b end