sig
type t = Struct.CommentFilter.Make(Token).t
val mk : unit -> t
val define : Token.Filter.t -> t -> unit
val filter :
t -> (Token.t * Token.Loc.t) Stream.t -> (Token.t * Token.Loc.t) Stream.t
val take_list : t -> (string * Token.Loc.t) list
val take_stream : t -> (string * Token.Loc.t) Stream.t
end