module Chan:sig
..end
val open_in : Pervasives.in_channel -> Kwchan.src
val close_in : Kwchan.src -> unit
val with_in : ?iflags:Pervasives.open_flag list ->
?isstdin:(string -> bool) -> (Kwchan.src -> 'a) -> string -> 'a
with_in ?iflags ?isstdin f src
: apply a function to the contents
of a channel src, making sure to close the src afterwards.f
: f src
function to apply to src
resulting from opening filenamefilename
: name of file to open