diff options
| author | coqbot-app[bot] | 2020-08-25 08:32:20 +0000 |
|---|---|---|
| committer | GitHub | 2020-08-25 08:32:20 +0000 |
| commit | bd4791ff350bef9dc45b42b2ae77769625644c4f (patch) | |
| tree | 02fb8f7c029ea53839714688edd8b888af9a3db8 /engine/proofview.ml | |
| parent | 016bafd7519859737610810df77f72bf812c542a (diff) | |
| parent | a970072a64348a1b5af1cd45a138da819ef0a8d2 (diff) | |
Merge PR #12878: Update sigma instead of erasing it in `update_global_env`
Reviewed-by: SkySkimmer
Diffstat (limited to 'engine/proofview.ml')
| -rw-r--r-- | engine/proofview.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/engine/proofview.ml b/engine/proofview.ml index de38104ecd..fd8512d73e 100644 --- a/engine/proofview.ml +++ b/engine/proofview.ml @@ -1032,6 +1032,9 @@ 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 } + end module UnsafeRepr = Proof.Unsafe |