sig
  type t = Cstring.cst
  val compare : '-> '-> int
  val pretty : Format.formatter -> Cstring.cst -> unit
  val hash : Cstring.STR.t -> int
end