aboutsummaryrefslogtreecommitdiffhomepage
path: root/proofs/evar_refiner.ml
diff options
context:
space:
mode:
Diffstat (limited to 'proofs/evar_refiner.ml')
-rw-r--r--proofs/evar_refiner.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/evar_refiner.ml b/proofs/evar_refiner.ml
index 91e13aeed..09879d585 100644
--- a/proofs/evar_refiner.ml
+++ b/proofs/evar_refiner.ml
@@ -147,7 +147,7 @@ let instantiate n c gl =
let pfic gls c =
let evc = gls.sigma in
- Astterm.interp_constr evc (Global.env_of_context gls.it.evar_hyps) c
+ Constrintern.interp_constr evc (Global.env_of_context gls.it.evar_hyps) c
(*
let instantiate_tac = function
@@ -170,7 +170,7 @@ let instantiate_pf_com n com pfts =
with Failure _ ->
error "not so many uninstantiated existential variables"
in
- let c = Astterm.interp_constr sigma (Evarutil.evar_env evd) com in
+ let c = Constrintern.interp_constr sigma (Evarutil.evar_env evd) com in
let wc' = w_Define sp c wc in
let newgc = (w_Underlying wc') in
change_constraints_pftreestate newgc pfts