sig
  external code : char -> int = "%identity"
  val chr : int -> char
  val escaped : char -> string
  val lowercase : char -> char
  val uppercase : char -> char
  val lowercase_ascii : char -> char
  val uppercase_ascii : char -> char
  type t = char
  val is_whitespace : char -> bool
  val is_uppercase : char -> bool
  val is_lowercase : char -> bool
  val is_uppercase_latin1 : char -> bool
  val is_lowercase_latin1 : char -> bool
  val is_latin1 : char -> bool
  val is_digit : char -> bool
  val is_symbol : char -> bool
  val is_letter : char -> bool
  val is_newline : char -> bool
  val of_digit : int -> char
  val enum : unit -> char BatEnum.t
  val range : ?until:char -> char -> char BatEnum.t
  val ( -- ) : char -> char -> char BatEnum.t
  module Infix : sig val ( -- ) : char -> char -> char BatEnum.t end
  val print : 'a BatInnerIO.output -> Stdlib.Char.t -> unit
  val compare : BatChar.t -> BatChar.t -> int
  val equal : BatChar.t -> BatChar.t -> bool
  val hash : BatChar.t -> int
  val ord : char BatOrd.ord
  module Incubator :
    sig
      module Comp : sig type t = char val compare : t BatOrd.comp end
      module Ord : sig type t = char val ord : t BatOrd.ord end
      module Eq : sig type t = char val eq : t BatOrd.eq end
    end
  external unsafe_chr : int -> char = "%identity"
  external unsafe_int : char -> int = "%identity"
end