diff options
| author | Matthieu Sozeau | 2013-12-17 16:23:16 +0100 |
|---|---|---|
| committer | Matthieu Sozeau | 2013-12-17 16:23:16 +0100 |
| commit | 5080f91a191aa08bf29790addb5b8614ba8323a8 (patch) | |
| tree | 733d449608a0e392c7033e18d3f699b144ba0948 /proofs | |
| parent | 35e47b6be8d9e97b58464daccc28d179951b5e47 (diff) | |
| parent | 16677f3d4e71b2f971ed36bbbc3b95d8908a1b13 (diff) | |
Merge branch 'trunk' of github.com:coq/coq into trunk
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/evar_refiner.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/evar_refiner.ml b/proofs/evar_refiner.ml index 36ba80202f..8c27767898 100644 --- a/proofs/evar_refiner.ml +++ b/proofs/evar_refiner.ml @@ -63,7 +63,7 @@ let w_refine (evk,evi) (ltac_var,rawc) sigma = let instantiate_pf_com evk com sigma = let evi = Evd.find sigma evk in let env = Evd.evar_filtered_env evi in - let rawc = Constrintern.intern_constr sigma env com in + let rawc = Constrintern.intern_constr env com in let ltac_vars = (Id.Map.empty, Id.Map.empty) in let sigma' = w_refine (evk, evi) (ltac_vars, rawc) sigma in sigma' |