sig   type t   exception Out_of_range   val char_of : UChar.t -> char   val of_char : char -> UChar.t   val code : UChar.t -> int   val chr : int -> UChar.t   external uint_code : UChar.t -> int = "%identity"   val chr_of_uint : int -> UChar.t   external unsafe_chr_of_uint : int -> UChar.t = "%identity"   val eq : UChar.t -> UChar.t -> bool   val compare : UChar.t -> UChar.t -> int   type uchar = UChar.t   val int_of_uchar : UChar.uchar -> int   val uchar_of_int : int -> UChar.uchar end