sig type t = char external code : char -> int = "%identity" val chr : int -> char val escaped : char -> string val compare : Char.t ->Char.t -> int val equal : Char.t ->Char.t -> bool moduleAscii : sig val min : char val max : char val is_valid : char -> bool val is_upper : char -> bool val is_lower : char -> bool val is_letter : char -> bool val is_alphanum : char -> bool val is_white : char -> bool val is_blank : char -> bool val is_graphic : char -> bool val is_print : char -> bool val is_control : char -> bool val is_digit : char -> bool val digit_to_int : char -> int val digit_of_int : int -> char val is_hex_digit : char -> bool val hex_digit_to_int : char -> int val lower_hex_digit_of_int : int -> char val upper_hex_digit_of_int : int -> char val uppercase : char -> char val lowercase : char -> char end val lowercase_ascii : char -> char val uppercase_ascii : char -> char val seeded_hash : int ->Char.t -> int val hash : Char.t -> int external unsafe_chr : int -> char = "%identity" end