From 6b4f90c6c0b3a2265140f045512004090e2f28e6 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Thu, 24 Sep 2026 01:11:45 +0000 Subject: `assoc` on associatives --- lib/Utilities.ml | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'lib/Utilities.ml') diff --git a/lib/Utilities.ml b/lib/Utilities.ml index 404d8aa..fb5a7b3 100644 --- a/lib/Utilities.ml +++ b/lib/Utilities.ml @@ -104,3 +104,7 @@ module Atomic = struct then Ok atom else mswap atom f end + +module Fun = struct + let ( |.| ) = Fun.compose +end -- cgit v1.2.3