diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-10-05 15:52:09 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-10-05 15:52:09 +0000 |
| commit | 67f5aa82fc2a1fca35e1f8ba0204f9417b148757 (patch) | |
| tree | 5bee263dfdf5ec0aac5b859f41c88d8248d8ebc9 /proofs/pfedit.ml | |
| parent | 685ae9ecd6635ab4e44368f8eb2c7415e6de42f6 (diff) | |
Fixing Implicit Tactic mode damaged by commit r14496 (see also bug #2612).
There were some confusion on the role of clear_proofs which was
applicable only to the global named_context. Hopefully made things
clearer.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14517 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/pfedit.ml')
| -rw-r--r-- | proofs/pfedit.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/pfedit.ml b/proofs/pfedit.ml index 2c85a26fe..e67c595bd 100644 --- a/proofs/pfedit.ml +++ b/proofs/pfedit.ml @@ -167,7 +167,7 @@ let build_constant_by_tactic id sign typ tac = let build_by_tactic env typ tac = let id = id_of_string ("temporary_proof"^string_of_int (next())) in - let sign = Decls.clear_proofs (named_context env) in + let sign = val_of_named_context (named_context env) in (build_constant_by_tactic id sign typ tac).const_entry_body (**********************************************************************) |