type t = in_channeltype open_flag = Pervasives.open_flag = val stdin : in_channelval open_bin : string -> in_channelval open_text : string -> in_channelval open_gen : open_flag list -> int -> string -> in_channelval read_and_close : in_channel -> (in_channel -> 'a) -> 'aval with_open_bin : string -> (in_channel -> 'a) -> 'aval with_open_text : string -> (in_channel -> 'a) -> 'aval with_open_gen : open_flag list -> int -> string -> (in_channel -> 'a) -> 'aval seek : in_channel -> int64 -> unitval pos : in_channel -> int64val length : in_channel -> int64val close : in_channel -> unitval close_noerr : in_channel -> unitval input_char : in_channel -> char optionval input_byte : in_channel -> int optionval input_line : in_channel -> string optionval input : in_channel -> bytes -> int -> int -> intval really_input : in_channel -> bytes -> int -> int -> unit optionval really_input_string : in_channel -> int -> string optionval set_binary_mode : in_channel -> bool -> unitval add_channel_to_the_end : chunk_size:int -> Buffer.t -> in_channel -> unitval input_all : in_channel -> string