summaryrefslogtreecommitdiff
path: root/src/util.mli
diff options
context:
space:
mode:
Diffstat (limited to 'src/util.mli')
-rw-r--r--src/util.mli4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/util.mli b/src/util.mli
index 9c57e360..3d83a1a4 100644
--- a/src/util.mli
+++ b/src/util.mli
@@ -73,6 +73,9 @@ val remove_duplicates : 'a list -> 'a list
(** [remove_dups compare eq l] as remove_duplicates but with parameterised comparison and equality *)
val remove_dups : ('a -> 'a -> int) -> ('a -> 'a -> bool) -> 'a list -> 'a list
+(** Lift a comparison order to the lexical order on lists *)
+val lex_ord_list : ('a -> 'a -> int) -> 'a list -> 'a list -> int
+
(** [assoc_equal_opt] and [assoc_compare_opt] are like List.assoc_opt
but take equality/comparison functions as arguments, rather than
relying on OCaml's built in equality *)
@@ -237,6 +240,7 @@ val split_on_char : char -> string -> string list
val termcode : int -> string
val bold : string -> string
+val dim : string -> string
val darkgray : string -> string
val green : string -> string
val red : string -> string