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