module Filter:sig..end
typetoken_filter =(Camlp4.Sig.Token.t, Camlp4.Sig.Loc.t) Camlp4.Sig.stream_filter
type t
val mk : (string -> bool) -> tval define_filter : t ->
(token_filter -> token_filter) ->
unitval filter : t -> token_filterval keyword_added : t -> string -> bool -> unitval keyword_removed : t -> string -> unit