diff --git a/vendor/ocamlformat_support/format_.ml b/vendor/ocamlformat_support/format_.ml
index 02269ab..aed7b32 100644
--- a/vendor/ocamlformat_support/format_.ml
+++ b/vendor/ocamlformat_support/format_.ml
@@ -85,7 +85,8 @@ type pp_token =
   | Pp_tbegin of tbox (* beginning of a tabulation box *)
   | Pp_tend (* end of a tabulation box *)
   | Pp_newline (* to force a newline inside a box *)
-  | Pp_if_newline (* to do something only if this very
+  | Pp_if_newline
+  (* to do something only if this very
                      line has been broken *)
   | Pp_string_if_newline of string
   (* print a string only if this very
diff --git a/infer/src/base/TaskBar.ml b/infer/src/base/TaskBar.ml
index 273d2ee22..0de25c495 100644
--- a/infer/src/base/TaskBar.ml
+++ b/infer/src/base/TaskBar.ml
@@ -72,7 +72,8 @@ let draw_top_bar fmt ~term_width ~total ~finished ~elapsed =
     ++ ( "%s"
@@ -72,7 +72,8 @@ let draw_top_bar fmt ~term_width ~total ~finished ~elapsed =
     ++ ( "%s"
        , max (String.length elapsed_string) 9
          (* leave some room for elapsed_string to avoid flicker. 9 characters is "XXhXXmXXs" so it
-            gives some reasonable margin. *) )
+            gives some reasonable margin. *)
+       )
   in
   let top_bar_size = min term_width top_bar_size_default in
   let progress_bar_size = top_bar_size - size_around_progress_bar in
diff --git a/infer/src/clang/cTrans.ml b/infer/src/clang/cTrans.ml
index 6d77c6f3b..912d8da20 100644
--- a/infer/src/clang/cTrans.ml
+++ b/infer/src/clang/cTrans.ml
@@ -3613,7 +3613,8 @@ module CTrans_funct (F : CModule_type.CFrontend) : CModule_type.CTranslation = s
         (* explicit with [this] or implicit with [&] *)
         | `LCK_VLAType
         (* capture a variable-length array by reference. we probably don't handle
-           this correctly elsewhere, but it's definitely not captured by value! *) -> true
+           this correctly elsewhere, but it's definitely not captured by value! *)
+          -> true
         | `LCK_ByCopy (* explicit with [x] or implicit with [=] *) ->
           (* [=] captures this by reference and everything else by value *)
           lci_capture_this
diff --git a/infer/src/nullsafe/ClassLevelAnalysis.ml b/infer/src/nullsafe/ClassLevelAnalysis.ml
index 7985bb922..af082744d 100644
--- a/infer/src/nullsafe/ClassLevelAnalysis.ml
+++ b/infer/src/nullsafe/ClassLevelAnalysis.ml
@@ -119,7 +119,8 @@ let make_meta_issue all_issues current_mode class_name =
           | NullsafeMode.Strict
           (* We don't recommend "strict" for now as it is harder to keep a class in strict mode than it "trust none" mode.
              Trust none is almost as safe alternative, but adding a dependency will require just updating trust list,
-             without need to strictify it first. *) ->
+             without need to strictify it first. *)
+            ->
             "`@Nullsafe(value = Nullsafe.Mode.LOCAL, trustOnly = \
              @Nullsafe.TrustList({}))`"
           | NullsafeMode.Default | NullsafeMode.Local (NullsafeMode.Trust.Only _) ->

diff --git a/vendor/ocamlformat_support/format_.ml b/vendor/ocamlformat_support/format_.ml
index db25deb..2bda28a 100644
--- a/vendor/ocamlformat_support/format_.ml
+++ b/vendor/ocamlformat_support/format_.ml
@@ -93,7 +93,8 @@ type pp_token =
   | Pp_tbegin of tbox (* beginning of a tabulation box *)
   | Pp_tend (* end of a tabulation box *)
   | Pp_newline (* to force a newline inside a box *)
-  | Pp_if_newline (* to do something only if this very
+  | Pp_if_newline
+  (* to do something only if this very
                      line has been broken *)
   | Pp_string_if_newline of string
   (* print a string only if this very
diff --git a/infer/src/base/Config.ml b/infer/src/base/Config.ml
index feb179d64..52742a1fc 100644
--- a/infer/src/base/Config.ml
+++ b/infer/src/base/Config.ml
@@ -1629,7 +1629,8 @@ and nullsafe_optimistic_third_party_params_in_non_strict =
          Historically this is because there was no actionable way to change third party annotations.
          Now that we have such a support, this behavior should be reconsidered, provided
          our tooling and error reporting is friendly enough to be smoothly used by developers.
-      *) ~default:true
+      *)
+    ~default:true
     "Nullsafe: in this mode we treat non annotated third party method params \
      as if they were annotated as nullable."
 
diff --git a/infer/src/base/TaskBar.ml b/infer/src/base/TaskBar.ml
index 892f93830..4672f83a7 100644
--- a/infer/src/base/TaskBar.ml
+++ b/infer/src/base/TaskBar.ml
@@ -77,7 +77,8 @@ let draw_top_bar fmt ~term_width ~total ~finished ~elapsed =
     ++ ( "%s",
          max (String.length elapsed_string) 9
          (* leave some room for elapsed_string to avoid flicker. 9 characters is "XXhXXmXXs" so it
-            gives some reasonable margin. *) )
+            gives some reasonable margin. *)
+       )
   in
   let top_bar_size = min term_width top_bar_size_default in
   let progress_bar_size = top_bar_size - size_around_progress_bar in
diff --git a/infer/src/nullsafe/ClassLevelAnalysis.ml b/infer/src/nullsafe/ClassLevelAnalysis.ml
index f6af04132..9bce6e750 100644
--- a/infer/src/nullsafe/ClassLevelAnalysis.ml
+++ b/infer/src/nullsafe/ClassLevelAnalysis.ml
@@ -103,7 +103,8 @@ let make_meta_issue all_issues current_mode class_name =
             | NullsafeMode.Strict
             (* We don't recommend "strict" for now as it is harder to keep a class in strict mode than it "trust none" mode.
                Trust none is almost as safe alternative, but adding a dependency will require just updating trust list,
-               without need to strictify it first. *) ->
+               without need to strictify it first. *)
+              ->
                 "`@Nullsafe(value = Nullsafe.Mode.LOCAL, trustOnly = \
                  @Nullsafe.TrustList({}))`"
             | NullsafeMode.Default
diff --git a/compiler/lib/js_output.ml b/compiler/lib/js_output.ml
index d584325ca..10a4bf9e5 100644
--- a/compiler/lib/js_output.ml
+++ b/compiler/lib/js_output.ml
@@ -973,7 +973,8 @@ struct
             PP.end_group f;
             PP.end_group f
             (* There MUST be a space between the return and its
-               argument. A line return will not work *) )
+               argument. A line return will not work *)
+        )
     | Labelled_statement (i, s) ->
         PP.string f (Javascript.Label.to_string i);
         PP.string f ":";
diff --git a/src/dune/foreign_rules.ml b/src/dune/foreign_rules.ml
index c6fe6f09..75a01d32 100644
--- a/src/dune/foreign_rules.ml
+++ b/src/dune/foreign_rules.ml
@@ -90,8 +90,8 @@ let build_c_file ~sctx ~dir ~expander ~include_flags (loc, src, dst) =
     (let src = Path.build (Foreign.Source.path src) in
      Command.run
      (* We have to execute the rule in the library directory as the .o is
-        produced in the current directory *) ~dir:(Path.build dir)
-       (Ok ctx.ocamlc)
+        produced in the current directory *)
+       ~dir:(Path.build dir) (Ok ctx.ocamlc)
        [
          A "-g";
          include_flags;
@@ -124,7 +124,8 @@ let build_cxx_file ~sctx ~dir ~expander ~include_flags (loc, src, dst) =
      let c_compiler = Ocaml_config.c_compiler ctx.ocaml_config in
      Command.run
      (* We have to execute the rule in the library directory as the .o is
-        produced in the current directory *) ~dir:(Path.build dir)
+        produced in the current directory *)
+       ~dir:(Path.build dir)
        (Super_context.resolve_program ~loc:None ~dir sctx c_compiler)
        ( [
            Command.Args.S [ A "-I"; Path ctx.stdlib_dir ];