class [('a, 'b)] o_input : ('a, 'b) IO.input -> object end
('a, 'b)
('a, 'b) IO.input -> object end
method read : 'a
'a
method nread : int -> 'b
int -> 'b
method pos : int
int
method available : int
method close : unit
unit