format

Author: d-kalinichenko

ocaml/typing/jkind.ml

@@ -1814,8 +1814,8 @@ let has_layout_any jkind =
 module Debug_printers = struct
   open Format
 
-  let concrete_creation_reason ppf :
-      History.concrete_creation_reason -> unit = function
+  let concrete_creation_reason ppf : History.concrete_creation_reason -> unit =
+    function
     | Match -> fprintf ppf "Match"
     | Constructor_declaration idx ->
       fprintf ppf "Constructor_declaration %d" idx

ocaml/typing/jkind.mli

@@ -91,7 +91,6 @@ module Layout : sig
         | Word
         | Bits32
         | Bits64
-
     end
   end
 end