Functor Camlp4.Struct.Grammar.Dynamic.Make

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

module Entry: Camlp4.Struct.Grammar.Entry.Make(Structure)

include Structure

val mk : unit -> gram

val get_filter : gram -> Token.Filter.t

val lex : gram ->
       Camlp4.Struct.Loc.t ->
       char Stream.t -> (Token.t * Camlp4.Struct.Loc.t) Stream.t

val lex_string : gram ->
       Camlp4.Struct.Loc.t -> string -> (Token.t * Camlp4.Struct.Loc.t) Stream.t

val filter : gram ->
       (Token.t * Token.Loc.t) Stream.t ->
       (Token.t * Structure.token_info) Stream.t

val parse_tokens_after_filter : Structure.internal_entry ->
       Structure.token_stream -> 'a

val parse_tokens_before_filter : Structure.internal_entry ->
       (Token.t * Token.Loc.t) Stream.t -> 'a

val parse : Structure.internal_entry ->
       Camlp4.Struct.Loc.t -> char Stream.t -> 'a

val parse_string : Structure.internal_entry ->
       Camlp4.Struct.Loc.t -> string -> 'a

val delete_rule : Structure.internal_entry ->
       Structure.symbol list -> unit

val srules : Structure.internal_entry ->
       (Structure.symbol list *
        Structure.Action.t)
       list -> symbol

val sfold0 : ('a -> 'b -> 'b) ->
       'b -> ('c, 'a, 'b) Structure.fold

val sfold1 : ('a -> 'b -> 'b) ->
       'b -> ('c, 'a, 'b) Structure.fold

val sfold0sep : ('a -> 'b -> 'b) ->
       'b -> ('c, 'a, 'b) Structure.foldsep

val extend : Structure.internal_entry ->
       Camlp4.Sig.Grammar.position option *
       (string option * Camlp4.Sig.Grammar.assoc option *
        (Structure.symbol list *
         Structure.Action.t)
        list)
       list -> unit