diff options
| author | Gaëtan Gilbert | 2020-08-25 12:02:35 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2020-08-31 15:12:02 +0200 |
| commit | 576c1153dae2b3660d35127862aeb3d528eb6d8d (patch) | |
| tree | 045226b7c3d9fafcaed62070db551b15b3b2b56d /proofs/proof.ml | |
| parent | daca83946ed5a001f2461fefa787a80f7dcdea01 (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 'proofs/proof.ml')
| -rw-r--r-- | proofs/proof.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/proof.ml b/proofs/proof.ml index d7904c56a8..616cbf9678 100644 --- a/proofs/proof.ml +++ b/proofs/proof.ml @@ -353,8 +353,8 @@ let compact p = let entry, proofview = Proofview.compact p.entry p.proofview in { p with proofview; entry } -let update_sigma_env p env = - let proofview = Proofview.Unsafe.update_sigma_env p.proofview env in +let update_sigma_univs ugraph p = + let proofview = Proofview.Unsafe.update_sigma_univs ugraph p.proofview in { p with proofview } (*** Function manipulation proof extra informations ***) |