wip

reasonml · Nov 3, 2024 · 3f4601f · 3f4601f
1 parent a138e50
commit 3f4601f
Showing 1 changed file with 2 additions and 0 deletions.
diff --git 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) =