diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-03-21 15:27:15 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-03-21 15:27:15 +0000 |
| commit | e3d808c4aa7387a12aee0d30a64ea85550b82eb8 (patch) | |
| tree | cd3f4e9d0073a8b4a13743744154e71d2abb4fa8 /toplevel | |
| parent | f43d96aec71449e3b75e9fd732e87694cec5db8f (diff) | |
Check unexpected "Local" keyword in cmd before opening a proof (fix #2975)
This fix isn't ideal. Instead, something like States.with_heavy_rollback
should be able to cancel a proof started during a command interp that failed.
But anyway, "le mieux est l'ennemi du bien"...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16333 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/vernacentries.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 9329ab9ff..e8fef0060 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -447,6 +447,7 @@ let vernac_notation = Metasyntax.add_notation (* Gallina *) let start_proof_and_print k l hook = + Locality.check_locality (); (* early check, cf #2975 *) start_proof_com k l hook; print_subgoals () |