aboutsummaryrefslogtreecommitdiff
path: root/plugins/ltac/tacintern.ml
diff options
context:
space:
mode:
authorThéo Zimmermann2019-06-19 10:41:09 +0200
committerThéo Zimmermann2019-06-19 10:41:09 +0200
commitcdba5f7ceee1adfbdd96ffc82115fbc1e6750b80 (patch)
treee4e94c235b18bdf96b82db071da74535ccd827c5 /plugins/ltac/tacintern.ml
parent415e83efb9e767ddf65b8c27d4e497592fd61f2c (diff)
parent459b5ce5b2b825db43d645357f83d7fe17289bc5 (diff)
Merge PR #10239: Deprecate grammar entry "intropattern" in tactic notations in favor of "simple_intropattern"
Reviewed-by: Zimmi48 Reviewed-by: ppedrot
Diffstat (limited to 'plugins/ltac/tacintern.ml')
-rw-r--r--plugins/ltac/tacintern.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/plugins/ltac/tacintern.ml b/plugins/ltac/tacintern.ml
index 0fa4dc8baf..3ed5b1aab2 100644
--- a/plugins/ltac/tacintern.ml
+++ b/plugins/ltac/tacintern.ml
@@ -795,7 +795,8 @@ let () =
let ist = { ist with ltacvars = !lf } in
(ist, ans)
in
- Genintern.register_intern0 wit_intro_pattern intern_intro_pattern
+ Genintern.register_intern0 wit_intropattern intern_intro_pattern [@warning "-3"];
+ Genintern.register_intern0 wit_simple_intropattern intern_intro_pattern
let () =
let intern_clause ist cl =