sig   external code : char -> int = "%identity"   val chr : int -> char   val escaped : char -> string   val lowercase : char -> char   val uppercase : char -> char   type t = char   external unsafe_chr : int -> char = "%identity"   val equal : t -> t -> bool   val compare : t -> t -> int   val lowercase_ascii : t -> t   val uppercase_ascii : t -> t   val of_int_exn : int -> t   val of_int : int -> t option   val to_int : t -> int   val pp : Buffer.t -> t -> unit   val print : Format.formatter -> t -> unit end