diff options
| author | Dave Love <fx@gnu.org> | 1998-02-24 12:45:02 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 1998-02-24 12:45:02 +0000 |
| commit | ac6d55905e841d4993304a68b1a8666b1272f6ae (patch) | |
| tree | 5c4f83c238ffb35c24f75cd390c3a3efaf20a273 /lisp/progmodes | |
| parent | 81b77a09edd75be7491ad90e20f63e9dca15c898 (diff) | |
| download | emacs-ac6d55905e841d4993304a68b1a8666b1272f6ae.tar.gz | |
(compilation-error-regexp-alist): Allow initial
program name in first pattern.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/compile.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 7b9b9085b36..53c291825f4 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -150,12 +150,14 @@ or when it is used with \\[next-error] or \\[compile-goto-error].") ;; foo.f :16 some horrible error message ;; or GNU utilities with column (GNAT 1.82): ;; foo.adb:2:1: Unit name does not match file name + ;; or with column and program name: + ;; jade:dbcommon.dsl:133:17:E: missing argument for function call ;; ;; We'll insist that the number be followed by a colon or closing ;; paren, because otherwise this matches just about anything ;; containing a number with spaces around it. - ("\\([a-zA-Z]?:?[^:( \t\n]+\\)[:(][ \t]*\\([0-9]+\\)\\([) \t]\\|\ -:\\([^0-9\n]\\|\\([0-9]+:\\)\\)\\)" 1 2 5) + ("\\([a-zA-Z]+:\\)?\\([a-zA-Z]?:?[^:( \t\n]+\\)[:(][ \t]*\\([0-9]+\\)\ +\\([) \t]\\|:\\([^0-9\n]\\|\\([0-9]+:\\)\\)\\)" 2 3 6) ;; Microsoft C/C++: ;; keyboard.c(537) : warning C4005: 'min' : macro redefinition |