sig
val with_in :
?mode:int ->
?flags:Pervasives.open_flag list -> string -> (char Gen.t -> 'a) -> 'a
val with_lines :
?mode:int ->
?flags:Pervasives.open_flag list -> string -> (string Gen.t -> 'a) -> 'a
val write_str :
?mode:int ->
?flags:Pervasives.open_flag list ->
?sep:string -> string -> string Gen.t -> unit
val write :
?mode:int ->
?flags:Pervasives.open_flag list -> string -> char Gen.t -> unit
val write_lines :
?mode:int ->
?flags:Pervasives.open_flag list -> string -> string Gen.t -> unit
end