diff --git a/src/core/CCResult.ml b/src/core/CCResult.ml index 2a99f726..14437120 100644 --- a/src/core/CCResult.ml +++ b/src/core/CCResult.ml @@ -170,7 +170,9 @@ let is_error = function let split_ok_error results = results |> CCList.partition_filter_map (fun x -> - match x with Ok o -> `Left o | Error e -> `Right e) + match x with + | Ok o -> `Left o + | Error e -> `Right e) (** {2 Wrappers} *)