diff options
| author |  ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-11-04 13:20:47 +0000 |
|---|---|---|
| committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-11-04 13:20:47 +0000 |
| commit | d71f9b16a49ce4faa61ba9b3c57f43c3acceb8cb (patch) | |
| tree | e8921e7b66569dd2e94078cfcdb79fd4d37a62fe /proofs/proof.ml | |
| parent | d4e378d6a984830d6b7d02340a89e2563d3f70ed (diff) | |
Allowing proofs starting with a non-empty evarmap.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@17055 85f007b7-540e-0410-9357-904b9bb8a0f7
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 1dca04336..35166def0 100644 --- a/proofs/proof.ml +++ b/proofs/proof.ml @@ -226,9 +226,9 @@ let end_of_stack = CondEndStack end_of_stack_kind let unfocused = is_last_focus end_of_stack_kind -let start goals = +let start sigma goals = let pr = { - proofview = Proofview.init goals ; + proofview = Proofview.init sigma goals ; focus_stack = [] ; shelf = [] ; given_up = [] } in |