module CommentFilter

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