'Stream.t -> ['a] OOChannel.obj_input_channel