sig
  val is_alpha : char -> bool
  val is_num : char -> bool
  val is_alpha_num : char -> bool
  val is_hex_num : char -> bool
  external code : char -> int = "%identity"
  val chr : int -> char
  val escaped : char -> string
  val lowercase : char -> char
  val uppercase : char -> char
  type t = char
  val compare : UtilsLib.Char.t -> UtilsLib.Char.t -> int
  external unsafe_chr : int -> char = "%identity"
end