class type inputStreamPump =Inheritsobject
..end
method init : 'a.
(#inputStream as 'a) ->
float -> float -> float -> float -> bool -> unit
method asyncRead : 'b 'c.
(#streamListener as 'b) ->
(#supports as 'c) -> unit