Functor Camlp4.Struct.CommentFilter.Make

module Make: 
functor (Token : Camlp4.Sig.Camlp4Token) -> sig .. end

type t = (string * Token.Loc.t) Stream.t * (string * Token.Loc.t) Queue.t 

val mk : unit -> 'a Stream.t * 'a Queue.t

val filter : 'a * (string * 'b) Queue.t ->
       (Camlp4.Sig.camlp4_token * 'b) Stream.t ->
       (Camlp4.Sig.camlp4_token * 'b) Stream.t

val take_list : 'a * 'b Queue.t -> 'b list

val take_stream : 'a * 'b -> 'a

val define : Token.Filter.t -> 'a * (string * Token.Loc.t) Queue.t -> unit