diff options
| author | Hugo Herbelin | 2014-12-06 16:31:22 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2014-12-07 15:14:38 +0100 |
| commit | 3b93c6cfbb838bcc2b9bdc1e4e2e669a86c75893 (patch) | |
| tree | bb4b7892a9a77f74b1975ec19aa5ace48bec3edb /proofs/proofview.ml | |
| parent | f875ae88edd6a45ab72335eee0735a65d027435c (diff) | |
Exporting store of goals so that new_evar in convert, intro, etc. can
propagate it. This allows C-zar to continue to work.
Don't know if it is the best way to do it.
Diffstat (limited to 'proofs/proofview.ml')
| -rw-r--r-- | proofs/proofview.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/proofs/proofview.ml b/proofs/proofview.ml index 08a43737c4..ff0e57be2b 100644 --- a/proofs/proofview.ml +++ b/proofs/proofview.ml @@ -856,6 +856,7 @@ module Goal = struct let sigma { sigma=sigma } = sigma let hyps { env=env } = Environ.named_context env let concl { concl=concl } = concl + let extra { sigma=sigma; self=self } = Goal.V82.extra sigma self let raw_concl { concl=concl } = concl |