diff options
| author | Pierre-Marie Pédrot | 2016-03-19 01:34:55 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-03-19 01:35:14 +0100 |
| commit | f63cf9d72c7feb6aa65e525bf6262559a355435f (patch) | |
| tree | 82264308c979e846501e86634f319f7caf10a048 /parsing/entry.mli | |
| parent | 13c50b98b0a294a6056d2e00a0de44cedca7af12 (diff) | |
| parent | 25f39e54e4e8eaf08865121f06635dc3bd1092da (diff) | |
Cleaning up and extending the expressivity of Pcoq.
Diffstat (limited to 'parsing/entry.mli')
| -rw-r--r-- | parsing/entry.mli | 29 |
1 files changed, 4 insertions, 25 deletions
diff --git a/parsing/entry.mli b/parsing/entry.mli index 97cd5b1105..4c73fe2049 100644 --- a/parsing/entry.mli +++ b/parsing/entry.mli @@ -11,34 +11,13 @@ type 'a t (** Typed grammar entries. We need to defined them here so that they are marshallable and defined before the Pcoq.Gram module. They are basically - unique names made of a universe and an entry name. They should be kept - synchronized with the {!Pcoq} entries though. *) + unique names. They should be kept synchronized with the {!Pcoq} entries. *) -type repr = string * string -(** Representation of entries. *) - -(** Table of Coq statically defined grammar entries *) - -type universe - -(** There are four predefined universes: "prim", "constr", "tactic", "vernac" *) - -val get_univ : string -> universe -val univ_name : universe -> string - -val uprim : universe -val uconstr : universe -val utactic : universe -val uvernac : universe - -(** {5 Uniquely defined entries} *) - -val create : universe -> string -> 'a t +val create : string -> 'a t (** Create an entry. They should be synchronized with the entries defined in {!Pcoq}. *) (** {5 Meta-programming} *) -val repr : 'a t -> repr - -val unsafe_of_name : (string * string) -> 'a t +val repr : 'a t -> string +val unsafe_of_name : string -> 'a t |