sig
  type 'a e
  val create : Grammar.g -> string -> 'Grammar.Entry.e
  val parse : 'Grammar.Entry.e -> char Stream.t -> 'a
  val parse_all : 'Grammar.Entry.e -> char Stream.t -> 'a list
  val parse_token : 'Grammar.Entry.e -> Grammar.token Stream.t -> 'a
  val parse_parsable : 'Grammar.Entry.e -> Grammar.parsable -> 'a
  val name : 'Grammar.Entry.e -> string
  val of_parser :
    Grammar.g ->
    string -> (Grammar.token Stream.t -> 'a) -> 'Grammar.Entry.e
  val print : 'Grammar.Entry.e -> unit
  val find : 'Grammar.Entry.e -> string -> Obj.t Grammar.Entry.e
  external obj : 'Grammar.Entry.e -> Grammar.token Gramext.g_entry
    = "%identity"
end