diff options
| author | letouzey | 2011-05-18 13:31:29 +0000 |
|---|---|---|
| committer | letouzey | 2011-05-18 13:31:29 +0000 |
| commit | d85e6bd09c32291e20962e29d739f2ffbe23c98f (patch) | |
| tree | 607c08c811b245f8a8f06f43d28b66dfa2abdd2b | |
| parent | 7e52f7728dcfcede7e40455385f3eef05a499c0d (diff) | |
Coqide: allow the use of Abort (grant wish #2357)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14136 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | ide/coq_lex.mll | 2 | ||||
| -rw-r--r-- | toplevel/ide_slave.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ide/coq_lex.mll b/ide/coq_lex.mll index 7f91ceee68..2ce8777c3c 100644 --- a/ide/coq_lex.mll +++ b/ide/coq_lex.mll @@ -65,7 +65,7 @@ let is_proof_end = let h = Hashtbl.create 97 in List.iter (fun s -> Hashtbl.add h s ()) - [ "Qed" ; "Defined" ; "Admitted" ]; + [ "Qed" ; "Defined" ; "Admitted"; "Abort" ]; Hashtbl.mem h let start = ref true diff --git a/toplevel/ide_slave.ml b/toplevel/ide_slave.ml index 72ebecfa70..ee231b0445 100644 --- a/toplevel/ide_slave.ml +++ b/toplevel/ide_slave.ml @@ -148,7 +148,7 @@ let rec attribute_of_vernac_command = function (* Proof management *) | VernacGoal _ -> [GoalStartingCommand] - | VernacAbort _ -> [NavigationCommand] + | VernacAbort _ -> [] | VernacAbortAll -> [NavigationCommand] | VernacRestart -> [NavigationCommand] | VernacSuspend -> [NavigationCommand] |