aboutsummaryrefslogtreecommitdiff
path: root/tactics
diff options
context:
space:
mode:
Diffstat (limited to 'tactics')
-rw-r--r--tactics/extratactics.ml45
1 files changed, 2 insertions, 3 deletions
diff --git a/tactics/extratactics.ml4 b/tactics/extratactics.ml4
index e4ba9a7ee5..41f8dc8dec 100644
--- a/tactics/extratactics.ml4
+++ b/tactics/extratactics.ml4
@@ -628,9 +628,8 @@ let hResolve id c occ t gl =
let sigma = project gl in
let env = Termops.clear_named_body id (pf_env gl) in
let env_ids = Termops.ids_of_context env in
- let env_names = Termops.names_of_rel_context env in
- let c_raw = Detyping.detype true env_ids env_names sigma c in
- let t_raw = Detyping.detype true env_ids env_names sigma t in
+ let c_raw = Detyping.detype true env_ids env sigma c in
+ let t_raw = Detyping.detype true env_ids env sigma t in
let rec resolve_hole t_hole =
try
Pretyping.understand env sigma t_hole