sig
  type t =
      Illegal_token of string
    | Keyword_as_label of string
    | Illegal_token_pattern of string * string
    | Illegal_constructor of string
  exception E of Camlp4.Struct.Token.Make.Error.t
  val print : Format.formatter -> Camlp4.Struct.Token.Make.Error.t -> unit
  val to_string : Camlp4.Struct.Token.Make.Error.t -> string
end