10
1
mirror of https://gitlab.com/scemama/QCaml.git synced 2024-11-19 12:32:21 +01:00
QCaml/Utils/Printing.ml
2019-03-02 16:48:35 +01:00

8 lines
134 B
OCaml

let line ?(c='-') n =
String.make n c
let ppf_dev_null =
let oc = open_out "/dev/null" in
Format.formatter_of_out_channel oc