diff options
author | 2016-05-03 20:49:01 +0200 | |
---|---|---|
committer | 2016-05-04 13:47:12 +0200 | |
commit | c7fd62135403c1ea38194fcdd8035237ee108318 (patch) | |
tree | 4fc94b097de3969dfe71121865c8e19b276cb38c /ltac/tacsubst.ml | |
parent | 729d838838d8df06395726477817620e2ae998bc (diff) |
Removing useless generic arguments.
Diffstat (limited to 'ltac/tacsubst.ml')
-rw-r--r-- | ltac/tacsubst.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/ltac/tacsubst.ml b/ltac/tacsubst.ml index 438219f5a..54d32f266 100644 --- a/ltac/tacsubst.ml +++ b/ltac/tacsubst.ml @@ -301,7 +301,6 @@ let () = Genintern.register_subst0 wit_tactic subst_tactic; Genintern.register_subst0 wit_ltac subst_tactic; Genintern.register_subst0 wit_constr subst_glob_constr; - Genintern.register_subst0 wit_sort (fun _ v -> v); Genintern.register_subst0 wit_clause_dft_concl (fun _ v -> v); Genintern.register_subst0 wit_uconstr (fun subst c -> subst_glob_constr subst c); Genintern.register_subst0 wit_open_constr (fun subst c -> subst_glob_constr subst c); @@ -309,5 +308,4 @@ let () = Genintern.register_subst0 wit_quant_hyp subst_declared_or_quantified_hypothesis; Genintern.register_subst0 wit_bindings subst_bindings; Genintern.register_subst0 wit_constr_with_bindings subst_glob_with_bindings; - Genintern.register_subst0 wit_constr_may_eval subst_raw_may_eval; () |