aboutsummaryrefslogtreecommitdiff
path: root/plugins/ltac/tacarg.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2018-05-22 04:57:00 +0200
committerEmilio Jesus Gallego Arias2018-06-12 14:42:28 +0200
commit18aac5cdc6ce8be8c5c88d284cd10e82814cb303 (patch)
treecd73ab17e32bbe46c422208469c912f87968fc47 /plugins/ltac/tacarg.ml
parent368a25e4ef14512b00f5799e26c3f615bc540201 (diff)
[api] Misctypes removal: move Tactypes to proofs
This gets `Tactypes` closer to `tactics/`, however some legacy stuff blocks it in `proofs`. We consider that is satisfactory for now.
Diffstat (limited to 'plugins/ltac/tacarg.ml')
-rw-r--r--plugins/ltac/tacarg.ml8
1 files changed, 8 insertions, 0 deletions
diff --git a/plugins/ltac/tacarg.ml b/plugins/ltac/tacarg.ml
index 6eb482b1c3..8a25d4851f 100644
--- a/plugins/ltac/tacarg.ml
+++ b/plugins/ltac/tacarg.ml
@@ -19,6 +19,14 @@ let make0 ?dyn name =
let () = Geninterp.register_val0 wit dyn in
wit
+let wit_intro_pattern = make0 "intropattern"
+let wit_quant_hyp = make0 "quant_hyp"
+let wit_constr_with_bindings = make0 "constr_with_bindings"
+let wit_open_constr_with_bindings = make0 "open_constr_with_bindings"
+let wit_bindings = make0 "bindings"
+let wit_quantified_hypothesis = wit_quant_hyp
+let wit_intropattern = wit_intro_pattern
+
let wit_tactic : (raw_tactic_expr, glob_tactic_expr, Val.t) genarg_type =
make0 "tactic"