diff options
| author |  ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-11-10 04:02:18 +0000 |
|---|---|---|
| committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-11-10 04:02:18 +0000 |
| commit | 6544bd19001a18aea49c30e94a09649f2dcc61e4 (patch) | |
| tree | d8abecbdac9cf8671e0a2d8167e6327d47e8ac83 /parsing/egramcoq.mli | |
| parent | 36e41e7581c86214a9f0f97436eb96a75b640834 (diff) | |
Removing the dependency of every level of tactic ATSs on glob_tactic_expr.
Instead of putting the body directly in the AST, we register it in a table.
This time it should work properly. Tactic notation are given kernel names to
ensure the unicity of their contents.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@17079 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing/egramcoq.mli')
| -rw-r--r-- | parsing/egramcoq.mli | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/parsing/egramcoq.mli b/parsing/egramcoq.mli index 9ae49f718..19e8ee8f6 100644 --- a/parsing/egramcoq.mli +++ b/parsing/egramcoq.mli @@ -41,10 +41,8 @@ type notation_grammar = { } type tactic_grammar = { - tacgram_key : string; tacgram_level : int; tacgram_prods : grammar_prod_item list; - tacgram_tactic : DirPath.t * Tacexpr.glob_tactic_expr; } (** {5 Adding notations} *) @@ -52,7 +50,7 @@ type tactic_grammar = { val extend_constr_grammar : Notation.level -> notation_grammar -> unit (** Add a term notation rule to the parsing system. *) -val extend_tactic_grammar : tactic_grammar -> unit +val extend_tactic_grammar : KerName.t -> tactic_grammar -> unit (** Add a tactic notation rule to the parsing system. *) val recover_constr_grammar : notation -> Notation.level -> notation_grammar |