diff --git a/vendor/ocaml/parsing/location.mli b/vendor/ocaml/parsing/location.mli
index 5d1fe9db94..790eaeef5a 100644
--- a/vendor/ocaml/parsing/location.mli
+++ b/vendor/ocaml/parsing/location.mli
@@ -105,6 +105,10 @@ val print_error_prefix: formatter -> unit -> unit
 
 val error: ?loc:t -> ?sub:error list -> ?if_highlight:string -> string -> error
 
+#if undefined BS_NO_COMPILER_PATCH then 
+val pp_ksprintf : ?before:(formatter -> unit) -> (string -> 'a) -> ('b, formatter, unit, 'a) format4 -> 'b
+#end
+
 val errorf: ?loc:t -> ?sub:error list -> ?if_highlight:string
             -> ('a, Format.formatter, unit, error) format4 -> 'a