let in_channel_to_int_seq_item_stream ?(buffer_size=65536) ?filename ?pedantic
      ?sharp_comments ?semicolon_comments inp =
    let x = Transform.string_to_int_seq_raw_item
      ?filename ?pedantic ?sharp_comments ?semicolon_comments () in
    let y = Transform.int_seq_raw_item_to_item () in
    Biocaml_transform.(
      compose_results x y ~on_error:(function `left x -> x | `right x -> x)
      |! in_channel_strings_to_stream ~buffer_size inp
    )