module CommentFilter:Camlp4.Struct.CommentFilter.Make(Token)
typet =(string * Token.Loc.t) Stream.t * (string * Token.Loc.t) Queue.t
val mk : unit -> 'a Stream.t * 'a Queue.tval filter : 'a * (string * 'b) Queue.t ->
(Camlp4.Sig.camlp4_token * 'b) Stream.t ->
(Camlp4.Sig.camlp4_token * 'b) Stream.tval take_list : 'a * 'b Queue.t -> 'b listval take_stream : 'a * 'b -> 'aval define : Token.Filter.t -> 'a * (string * Token.Loc.t) Queue.t -> unit