sig
  module Loc : Loc
  type t = camlp4_token
  val to_string : t -> string
  val print : Format.formatter -> t -> unit
  val match_keyword : string -> t -> bool
  val extract_string : t -> string
  module Filter :
    sig
      type token_filter = (t, Loc.t) stream_filter
      type t
      val mk : (string -> bool) -> t
      val define_filter : t -> (token_filter -> token_filter) -> unit
      val filter : t -> token_filter
      val keyword_added : t -> string -> bool -> unit
      val keyword_removed : t -> string -> unit
    end
  module Error : Error
end