Util
val compose : ('b -> 'c) -> ('a -> 'b) -> 'a -> 'c
val (@*) : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'b
val default : 'a -> 'a option -> 'a
val string_split : char -> String.t -> string list
val string_split_chars : string -> String.t -> string list
val is_prefix : String.t -> String.t -> bool
val ends_with_escape : String.t -> bool
val count_leading_spaces : String.t -> int
val shorten_string : int -> String.t -> string