From 0f5161930584eaf91fd195b891ce7d9130c7b7f1 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Sat, 24 Oct 2026 01:30:08 +0000 Subject: Forsake `fmap` --- lib/kernel/Storage.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/kernel/Storage.ml') diff --git a/lib/kernel/Storage.ml b/lib/kernel/Storage.ml index da438d2..5b1b722 100644 --- a/lib/kernel/Storage.ml +++ b/lib/kernel/Storage.ml @@ -51,5 +51,5 @@ module Make (S : Abstract.Storage.STORAGE) = struct Ok address let get_req tx addr = - S.get tx addr |> Utilities.Result.fmap (Option.to_result ~none:(Error.missing_data addr)) + Utilities.Result.(S.get tx addr |>> Option.to_result ~none:(Error.missing_data addr)) end -- cgit v1.2.3