]> rtime.felk.cvut.cz Git - l4.git/blob - l4/pkg/ocaml/contrib/camlp4/Camlp4/Struct/CommentFilter.mli
Inital import
[l4.git] / l4 / pkg / ocaml / contrib / camlp4 / Camlp4 / Struct / CommentFilter.mli
1 (****************************************************************************)
2 (*                                                                          *)
3 (*                              Objective Caml                              *)
4 (*                                                                          *)
5 (*                            INRIA Rocquencourt                            *)
6 (*                                                                          *)
7 (*  Copyright  2006   Institut National de Recherche  en  Informatique et   *)
8 (*  en Automatique.  All rights reserved.  This file is distributed under   *)
9 (*  the terms of the GNU Library General Public License, with the special   *)
10 (*  exception on linking described in LICENSE at the top of the Objective   *)
11 (*  Caml source tree.                                                       *)
12 (*                                                                          *)
13 (****************************************************************************)
14
15 (* Authors:
16  * - Daniel de Rauglaudre: initial version
17  * - Nicolas Pouillard: refactoring
18  *)
19 module Make (Token : Sig.Camlp4Token) : sig
20   open Token;
21
22   type t;
23
24   value mk : unit -> t;
25
26   value define : Token.Filter.t -> t -> unit;
27
28   value filter : t -> Stream.t (Token.t * Loc.t) -> Stream.t (Token.t * Loc.t);
29
30   value take_list : t -> list (string * Loc.t);
31
32   value take_stream : t -> Stream.t (string * Loc.t);
33 end;