sig
  type wchar = int64
  type wstring = Escape.wchar list
  val escape_char : char -> string
  val escape_string : string -> string
  val escape_wchar : Escape.wchar -> string
  val escape_wstring : Escape.wstring -> string
end