aboutsummaryrefslogtreecommitdiff
path: root/src/tac2qexpr.mli
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2017-08-01 20:35:19 +0200
committerPierre-Marie Pédrot2017-08-01 20:49:31 +0200
commit6d8b31504efce96ec6d3011763ced0c631cf576a (patch)
tree6f183951ce909c7b75f58fcaedcb9ccdba152d3a /src/tac2qexpr.mli
parent73ecd7e2f0136234f73f405a569858f2b0ecee9b (diff)
Don't reuse Coq AST for binding quotations.
This allows antiquotations in binding lists.
Diffstat (limited to 'src/tac2qexpr.mli')
-rw-r--r--src/tac2qexpr.mli6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/tac2qexpr.mli b/src/tac2qexpr.mli
index 794281cc75..b68efe73ac 100644
--- a/src/tac2qexpr.mli
+++ b/src/tac2qexpr.mli
@@ -9,6 +9,7 @@
open Util
open Loc
open Names
+open Tac2expr
(** Quoted variants of Ltac syntactic categories. Contrarily to the former, they
sometimes allow anti-quotations. Used for notation scopes. *)
@@ -17,6 +18,11 @@ type 'a or_anti =
| QExpr of 'a
| QAnti of Id.t located
+type bindings =
+| QImplicitBindings of raw_tacexpr list
+| QExplicitBindings of (Misctypes.quantified_hypothesis or_anti * raw_tacexpr) Loc.located list
+| QNoBindings
+
type intro_pattern =
| QIntroForthcoming of bool
| QIntroNaming of intro_pattern_naming