aboutsummaryrefslogtreecommitdiffhomepage
path: root/tactics/tactics.ml
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2018-03-04 16:50:36 +0100
committerGravatar Maxime Dénès <mail@maximedenes.fr>2018-03-04 16:50:36 +0100
commitb3a8761790c0905aad8e5d3102fab606fe5e7fd6 (patch)
treece5fbe8cb717bad677ad755e7875413d3e5d0e84 /tactics/tactics.ml
parent9cd987a07d3792dc200e15c5e792a25a1a99c9c6 (diff)
parent886a9c2fb25e32bd87b3fce38023b3e701134d23 (diff)
Merge PR #6511: [econstr] Continue consolidation of EConstr API under `interp`.
Diffstat (limited to 'tactics/tactics.ml')
-rw-r--r--tactics/tactics.ml1
1 files changed, 0 insertions, 1 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml
index 9e6580d22..94622114d 100644
--- a/tactics/tactics.ml
+++ b/tactics/tactics.ml
@@ -1991,7 +1991,6 @@ let exact_proof c =
Proofview.Goal.enter begin fun gl ->
Refine.refine ~typecheck:false begin fun sigma ->
let (c, ctx) = Constrintern.interp_casted_constr (pf_env gl) sigma c (pf_concl gl) in
- let c = EConstr.of_constr c in
let sigma = Evd.merge_universe_context sigma ctx in
(sigma, c)
end