object method blocked : bool method close : unit method closed : bool method count : int method push : 'a -> unit Lwt.t method resize : int -> unit method set_reference : 'b -> unit method size : int end