From b790c77c5e42a220a8419c69dbea3e392ee60fbe Mon Sep 17 00:00:00 2001 From: Marcos Magueta Date: Sun, 2 Aug 2026 23:38:05 -0300 Subject: Revert "format" This reverts commit fee14f4b29840357f87f02d51953f41ce90f7d9e. --- lib/Utilities.ml | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'lib/Utilities.ml') diff --git a/lib/Utilities.ml b/lib/Utilities.ml index f2c96a7..9ae0119 100644 --- a/lib/Utilities.ml +++ b/lib/Utilities.ml @@ -2,11 +2,11 @@ module Result = struct let ( let* ) = Result.bind let fmap f m = Result.bind m f - let sequence ms = - List.fold_right - (fun m acc -> - let* acc = acc in - let* m = m in - Ok (m :: acc) ) - ms (Ok []) + let sequence ms = List.fold_right + (fun m acc -> + let* acc = acc in + let* m = m in + Ok (m::acc)) + ms + (Ok []) end -- cgit v1.2.3