comparison lisp/progmodes/compile.el @ 8406:849045d64643

(compilation-error-regexp-alist): Fix previous change. Add alternatives for GNU error messages with program name in them.
author Richard M. Stallman <rms@gnu.org>
date Mon, 01 Aug 1994 00:39:26 +0000
parents 38513039d818
children 8b8835f1630a
comparison
equal deleted inserted replaced
8405:8b5d6aba9b46 8406:849045d64643
113 ;; because we want to leave that for another case (see below, GNAT). 113 ;; because we want to leave that for another case (see below, GNAT).
114 ;; 114 ;;
115 ;; We'll insist that the number be followed by a colon or closing 115 ;; We'll insist that the number be followed by a colon or closing
116 ;; paren, because otherwise this matches just about anything 116 ;; paren, because otherwise this matches just about anything
117 ;; containing a number with spaces around it. 117 ;; containing a number with spaces around it.
118 ("\n\\([^:( \t\n]+\\)[:(][ \t]*\\([0-9]+\\)\\([) \t]\\|:[^0-9\n]\\)" 2 3) 118 ("\n\\([^:( \t\n]+\\)[:(][ \t]*\\([0-9]+\\)\\([) \t]\\|:[^0-9\n]\\)" 1 2)
119
120 ;; GNU error message with a program name in it.
121 ;; compilername:file:linenum: error message
122 ("\n\\([^:( \t\n]+\\):\\([^:( \t\n]+\\):[ \t]*\\([0-9]+\\)\\(:[^0-9\n]\\)"
123 2 3)
119 124
120 ;; Borland C++: 125 ;; Borland C++:
121 ;; Error ping.c 15: Unable to open include file 'sys/types.h' 126 ;; Error ping.c 15: Unable to open include file 'sys/types.h'
122 ;; Warning ping.c 68: Call to function 'func' with no prototype 127 ;; Warning ping.c 68: Call to function 'func' with no prototype
123 ("\n\\(Error\\|Warning\\) \\([^:( \t\n]+\\)\ 128 ("\n\\(Error\\|Warning\\) \\([^:( \t\n]+\\)\
175 ("\n[EW], \\([^(\n]*\\)(\\([0-9]+\\),[ \t]*\\([0-9]+\\)" 1 2 3) 180 ("\n[EW], \\([^(\n]*\\)(\\([0-9]+\\),[ \t]*\\([0-9]+\\)" 1 2 3)
176 181
177 ;; GNAT compiler v1.82 182 ;; GNAT compiler v1.82
178 ;; foo.adb:2:1: Unit name does not match file name 183 ;; foo.adb:2:1: Unit name does not match file name
179 ("\n\\([^ \n\t:]+\\):\\([0-9]+\\):\\([0-9]+\\)[: \t]" 1 2 3) 184 ("\n\\([^ \n\t:]+\\):\\([0-9]+\\):\\([0-9]+\\)[: \t]" 1 2 3)
185
186 ;; GNU message with program name and column number.
187 ("\n\\([^ \n\t:]+\\):\\([^ \n\t:]+\\):\
188 \\([0-9]+\\):\\([0-9]+\\)[: \t]" 2 3 4)
180 ) 189 )
181 "Alist that specifies how to match errors in compiler output. 190 "Alist that specifies how to match errors in compiler output.
182 Each element has the form (REGEXP FILE-IDX LINE-IDX [COLUMN-IDX]). 191 Each element has the form (REGEXP FILE-IDX LINE-IDX [COLUMN-IDX]).
183 If REGEXP matches, the FILE-IDX'th subexpression gives the file name, and 192 If REGEXP matches, the FILE-IDX'th subexpression gives the file name, and
184 the LINE-IDX'th subexpression gives the line number. If COLUMN-IDX is 193 the LINE-IDX'th subexpression gives the line number. If COLUMN-IDX is