sig
  type 'a t
  val mk : gram -> string -> 'a Camlp4.Sig.Grammar.Dynamic.Entry.t
  val of_parser :
    gram ->
    string -> (token_stream -> 'a) -> 'a Camlp4.Sig.Grammar.Dynamic.Entry.t
  val setup_parser :
    'a Camlp4.Sig.Grammar.Dynamic.Entry.t -> (token_stream -> 'a) -> unit
  val name : 'a Camlp4.Sig.Grammar.Dynamic.Entry.t -> string
  val print :
    Format.formatter -> 'a Camlp4.Sig.Grammar.Dynamic.Entry.t -> unit
  val dump :
    Format.formatter -> 'a Camlp4.Sig.Grammar.Dynamic.Entry.t -> unit
  val obj : 'a Camlp4.Sig.Grammar.Dynamic.Entry.t -> internal_entry
  val clear : 'a Camlp4.Sig.Grammar.Dynamic.Entry.t -> unit
end