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 | 9b7dee8699537de2149136dd60fbdc787c1e4510 (patch) | |
tree | ba19d018901eca5fd25eb1572a265a268abd4274 /lisp/progmodes/compile.el | |
parent | dbfab20562a4cb3e39018f6d2a994d1aa4e49d3f (diff) | |
download | emacs-9b7dee8699537de2149136dd60fbdc787c1e4510.tar.gz |
(compilation-error-regexp-alist): Allow initial
program name in first pattern.
Diffstat (limited to 'lisp/progmodes/compile.el')
-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 |