testsuite/tests/formatting/margins.ml


1
2
3
4
5
6
7
8
9
10
11
12

(* TEST
   * toplevel
*)

let () = Format.pp_set_margin Format.std_formatter 20;;

1 + "foo";;

let () = Format.pp_set_margin Format.std_formatter 80;;
let () = Format.pp_set_max_indent Format.std_formatter 70;;

1 + "foo";;