Biocaml 0.4-dev : Biocaml_lines.MakeIO.write_file

let write_file ?perm ?append file pipe_r =

  Writer.with_file ?perm ?append file ~f:(fun w -> write w pipe_r)