From 3f4601f92b96448f5e5c7474d3d6a8498a78c190 Mon Sep 17 00:00:00 2001 From: Antonio Nuno Monteiro Date: Sat, 2 Nov 2024 18:43:26 -0700 Subject: [PATCH] wip --- src/vendored-omp/src/caml_format_doc.cppo.ml | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/vendored-omp/src/caml_format_doc.cppo.ml b/src/vendored-omp/src/caml_format_doc.cppo.ml index cba0ae05f..bb60d9ecf 100644 --- a/src/vendored-omp/src/caml_format_doc.cppo.ml +++ b/src/vendored-omp/src/caml_format_doc.cppo.ml @@ -521,7 +521,9 @@ let pp_print_result ~ok ~error ppf r = #if OCAML_VERSION >= (4,12,0) let pp_print_either ~left ~right ppf e = ppf := Doc.either ~left:(doc_printer left) ~right:(doc_printer right) e !ppf +#endif +#if OCAML_VERSION < (4,08,0) let comma ppf () = fprintf ppf ",@ " let pp_two_columns ?(sep = "|") ?max_lines ppf (lines: (string * string) list) =