Source file `ocaml_util.ml`

1
2
3
4
5
6
7
8
9
10
11
12
# 1 "ocaml_util.cppo.ml"
let print_error ~loc ~f ppf x =
  
# 3 "ocaml_util.cppo.ml"
  let error =
    let f = Format_doc.deprecated f in
    Location.error_of_printer ~loc f x in
  Location.print_report ppf error


# 254 "ocaml_util.cppo.ml"
module Utf8_lexeme = Misc.Utf8_lexeme