sig
type t = BatUChar.t
exception Out_of_range
val char_of : t -> char
val of_char : char -> t
external code : t -> int = "%identity"
val chr : int -> t
val eq : t -> t -> bool
val compare : t -> t -> int
type uchar = t
val int_of : uchar -> int
val of_int : int -> uchar
val unsafe_chr : int -> t
end