aboutsummaryrefslogtreecommitdiff
path: root/lib/util.mli
diff options
context:
space:
mode:
Diffstat (limited to 'lib/util.mli')
-rw-r--r--lib/util.mli1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/util.mli b/lib/util.mli
index 6bdc54b4ba..aa7042903d 100644
--- a/lib/util.mli
+++ b/lib/util.mli
@@ -156,6 +156,7 @@ val interval : int -> int -> int list
val in_some : 'a -> 'a option
val out_some : 'a option -> 'a
val option_app : ('a -> 'b) -> 'a option -> 'b option
+val option_compare : ('a -> 'b -> bool) -> 'a option -> 'b option -> bool
(* In [map_succeed f l] an element [a] is removed if [f a] raises *)
(* [Failure _] otherwise behaves as [List.map f l] *)