let stream_of_channel_lines inch =
  stream_of_channel_lines_gen ~close: false inch