aboutsummaryrefslogtreecommitdiffhomepage
path: root/toplevel
diff options
context:
space:
mode:
authorGravatar delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7>2001-01-03 18:05:23 +0000
committerGravatar delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7>2001-01-03 18:05:23 +0000
commit28c3c4724e3e37bc588fc395817d97b02165f61c (patch)
treef75dd341df66b659679056808258ddd8669489ae /toplevel
parent191aa5a3a923654d01c35a145a63166a28a2b886 (diff)
Let doit etre utilise dans le mode de preuve
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1233 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
-rw-r--r--toplevel/vernacentries.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml
index a37cfcf0b..9ad4fa012 100644
--- a/toplevel/vernacentries.ml
+++ b/toplevel/vernacentries.ml
@@ -766,6 +766,9 @@ let _ =
in
fun () ->
begin
+ if (kind = "LETTOP") && not(refining ()) then
+ errorlabstrm "Vernacentries.StartProof" [< 'sTR
+ "Let declarations can only be used in proof editing mode" >];
start_proof_com (Some s) stre com;
if not (is_silent()) then show_open_subgoals()
end