seq

reasonml · Nov 3, 2024 · 1999f3c · 1999f3c
1 parent 19a8f2e
commit 1999f3c
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
@@ -498,7 +498,9 @@ let pp_print_list ?(pp_sep=pp_print_cut) elt ppf l =
 
 let pp_print_array ?pp_sep elt ppf a =
   pp_print_iter ?pp_sep Array.iter elt ppf a
+#if OCAML_VERSION >= (4,07,0)
 let pp_print_seq ?pp_sep elt ppf s = pp_print_iter ?pp_sep Seq.iter elt ppf s
+#endif
 
 let pp_print_option  ?(none=fun _ () -> ()) elt ppf o =
   ppf := Doc.option ~none:(doc_printer none ()) (doc_printer elt) o !ppf