Source

mutated_ocaml / camlp4 / Camlp4 / Struct / Grammar / Dynamic.ml

Diff from to

camlp4/Camlp4/Struct/Grammar/Dynamic.ml

  *)
 module Make (Lexer : Sig.Lexer)
 : Sig.Grammar.Dynamic with module Loc = Lexer.Loc
-                         and module Token = Lexer.Token
+                       and module Token = Lexer.Token
+                       and type   token_info = (Structure.MakeTokenInfo Lexer.Loc).t
 = struct
   module Structure = Structure.Make Lexer;
   module Delete    = Delete.Make    Structure;
 
   value lex_string g loc str = lex g loc (Stream.of_string str);
 
+  value set_from_lexbuf = Lexer.set_from_lexbuf;
+
   value filter g ts = Tools.keep_prev_loc (Token.Filter.filter g.gfilter ts);
 
   value parse_tokens_after_filter entry ts = Entry.parse_tokens_after_filter entry ts;