aboutsummaryrefslogtreecommitdiff
path: root/engine/proofview.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2020-08-25 12:02:35 +0200
committerGaëtan Gilbert2020-08-31 15:12:02 +0200
commit576c1153dae2b3660d35127862aeb3d528eb6d8d (patch)
tree045226b7c3d9fafcaed62070db551b15b3b2b56d /engine/proofview.ml
parentdaca83946ed5a001f2461fefa787a80f7dcdea01 (diff)
Update update_global_env usage
- take just a ugraph instead of the whole env - rename to update_sigma_univs - push global env lookup a bit further up - fix vernacinterp call to update all surrounding proofs, not just the top one - flip argument order for nicer partial applications
Diffstat (limited to 'engine/proofview.ml')
-rw-r--r--engine/proofview.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/engine/proofview.ml b/engine/proofview.ml
index 2fc5ade0d2..5b0e6f5785 100644
--- a/engine/proofview.ml
+++ b/engine/proofview.ml
@@ -1037,8 +1037,8 @@ module Unsafe = struct
let mark_as_unresolvables p evs =
{ p with solution = mark_in_evm ~goal:false p.solution evs }
- let update_sigma_env pv env =
- { pv with solution = Evd.update_sigma_env pv.solution env }
+ let update_sigma_univs ugraph pv =
+ { pv with solution = Evd.update_sigma_univs ugraph pv.solution }
end