From 9376ddbdb70cc95f285e3e6aeef5742df37415c0 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Sat, 7 Nov 2026 03:48:30 +0000 Subject: Steal `group` from Karuta --- lib/Utilities.mli | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib/Utilities.mli') diff --git a/lib/Utilities.mli b/lib/Utilities.mli index e748693..7b5bfc2 100644 --- a/lib/Utilities.mli +++ b/lib/Utilities.mli @@ -38,6 +38,8 @@ module FingerTree : sig val filter_map : ('a -> 'b option) -> 'a BatFingerTree.t -> 'b BatFingerTree.t val concat : 'a BatFingerTree.t BatFingerTree.t -> 'a BatFingerTree.t val concat_mapm : ('a -> ('b BatFingerTree.t, 'e) result) -> 'a BatFingerTree.t -> ('b BatFingerTree.t, 'e) result + val sort : ('a -> 'a -> int) -> 'a BatFingerTree.t -> 'a BatFingerTree.t + val group : ('a -> 'a -> int) -> 'a BatFingerTree.t -> 'a BatFingerTree.t BatFingerTree.t end module Fun : sig -- cgit v1.2.3