Note:

You are viewing a development version of the library. Goto the latest version.

let open_out () = 
  let buf = 
    Buffer.create 13
  in
  let fmt = 
    Format.formatter_of_buffer buf
  in
    (buf, fmt),
    fmt