Module type `Grammar.S`

type te
type 'c pattern

module Parsable : sig ... end

val tokens : string -> (string option * int) list

module Entry : sig ... end

module rec Symbol : sig ... end

and Rule : sig ... end

and Rules : sig ... end

module Production : sig ... end

type 'a single_extend_statement = string option * Gramext.g_assoc option * 'a Production.t list
type 'a extend_statement = | Reuse of string option * 'a Production.t list Extend an existing level by its optional given name. If None, picks the topmost level. | Fresh of Gramext.position * 'a single_extend_statement list Create a level at the given position.

val generalize_symbol : ('a, 'tr, 'c) Symbol.t -> ('a, norec, 'c) Symbol.t option
val mk_rule : 'a pattern list -> string Rules.t
val level_of_nonterm : ('a, norec, 'c) Symbol.t -> string option