aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMakarius Wenzel1999-08-20 14:19:38 +0000
committerMakarius Wenzel1999-08-20 14:19:38 +0000
commit3b2c0bc25ceaa365257f3a47117a8c58e4bb1f82 (patch)
tree4bb9683e424413110e987def0ca3b5ba13d9614e
parentc26c52295c62fc31eedc09c4861cd6dd7ee379a8 (diff)
prefer proof-shell-interrupt-regexp over proof-shell-error-regexp
(interrupts may appear like error messages in Isabelle/Isar);
-rw-r--r--generic/proof-shell.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/proof-shell.el b/generic/proof-shell.el
index 3c4bfc22..e7d73e2b 100644
--- a/generic/proof-shell.el
+++ b/generic/proof-shell.el
@@ -840,14 +840,14 @@ This function - it can return one of 4 things: 'error, 'interrupt,
should be inserted into the script buffer and sent back to the proof
assistant."
(cond
+ ((string-match proof-shell-interrupt-regexp string)
+ 'interrupt)
+
((string-match proof-shell-error-regexp string)
(cons 'error (proof-shell-strip-annotations
(substring string
(match-beginning 0)))))
- ((string-match proof-shell-interrupt-regexp string)
- 'interrupt)
-
((and proof-shell-abort-goal-regexp
(string-match proof-shell-abort-goal-regexp string))
(proof-clean-buffer proof-goals-buffer)