revere check-typo

ocaml · Sep 10, 2021 · a296af2 · a296af2
1 parent 26a65bc
commit a296af2
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/typing/ctype.ml b/typing/ctype.ml
@@ -5400,7 +5400,7 @@ let immediacy env typ =
       if
         not (row_closed row)
         || List.exists
-           (fun (_, f) -> match row_field_repr f with 
+           (fun (_, f) -> match row_field_repr f with
            | Rpresent (Some _) | Reither (false, _, _) -> true
            | _ -> false)
           (row_fields row)

diff --git a/typing/types.mli b/typing/types.mli
@@ -56,10 +56,9 @@ open Asttypes
     Note on mutability: TBD.
  *)
 type type_expr
-
 type row_desc
 type row_field
-      
+
 type type_desc =
   | Tvar of string option
   (** [Tvar (Some "a")] ==> ['a] or ['_a]