Module Camlp4.Struct.Token.Make.Filter

module Filter: sig .. end

type token_filter = (Camlp4.Struct.Token.Make.t, Camlp4.Struct.Token.Make.Loc.t)
       Camlp4.Sig.stream_filter 

val mk : (string -> bool) -> t

val filter : t ->
       (t * Camlp4.Struct.Token.Make.Loc.t) Stream.t ->
       (t * Camlp4.Struct.Token.Make.Loc.t) Stream.t

val define_filter : t ->
       (token_filter ->
        token_filter) ->
       unit

val keyword_added : 'a -> 'b -> 'c -> unit

val keyword_removed : 'a -> 'b -> unit