Functor Camlp4.PreCast.MakeGram


module MakeGram: Camlp4.Struct.Grammar.Static.Make
Parameters:
Lexer : Camlp4.Sig.Lexer

include Structure
module Entry: sig .. end
val get_filter : unit -> Token.Filter.t
val lex : Camlp4.Struct.Loc.t ->
char Stream.t -> (Token.t * Camlp4.Struct.Loc.t) Stream.t
val lex_string : Camlp4.Struct.Loc.t -> string -> (Token.t * Camlp4.Struct.Loc.t) Stream.t
val filter : (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