summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-07-19 20:03:12 +0000
committerRichard M. Stallman <rms@gnu.org>1994-07-19 20:03:12 +0000
commit37fd22082c56b61b3502aec784944485520b557a (patch)
treee2e5c79e6909725bc498f3293b8d3ec4851adbbe
parent616da37c087effd2d1bd93d36e9bbb64597eabaa (diff)
downloademacs-37fd22082c56b61b3502aec784944485520b557a.tar.gz
(compilation-error-regexp-alist): Allow `(' after
linenum in "FILE", line LINENUM. Add backslash so C-M-a works.
-rw-r--r--lisp/progmodes/compile.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 087c2ebf20a..607bf06eb55 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -116,7 +116,7 @@ or when it is used with \\[next-error] or \\[compile-goto-error].")
;; paren, because otherwise this matches just about anything
;; containing a number with spaces around it.
("\n\\(Error\\|Warning\\)?[ \t]*\\([^:( \t\n]+\\)\
-[:(]?[ \t]*\\([0-9]+\\)[:) \t]" 2 3)
+\[:(]?[ \t]*\\([0-9]+\\)[:) \t]" 2 3)
;; 4.3BSD lint pass 2
;; strcmp: variable # of args. llib-lc(359) :: /usr/src/foo/foo.c(8)
@@ -149,7 +149,9 @@ of[ \t]+\"?\\([^\":\n]+\\)\"?:" 3 2)
;; File "foobar.ml", lines 5-8, characters 20-155: blah blah
;; Microtec mcc68k:
;; "foo.c", line 32 pos 1; (E) syntax error; unexpected symbol: "lossage"
- ("\"\\([^,\" \n\t]+\\)\", lines? \\([0-9]+\\)[:., -]" 1 2)
+ ;; GNAT (as of July 94):
+ ;; "foo.adb", line 2(11): warning: file name does not match ...
+ ("\"\\([^,\" \n\t]+\\)\", lines? \\([0-9]+\\)[:., (-]" 1 2)
;; MIPS RISC CC - the one distributed with Ultrix:
;; ccom: Error: foo.c, line 2: syntax error