Mercurial > emacs

comparison lisp/progmodes/compile.el @ 8398:38513039d818

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(compilation-error-regexp-alist): Make separate regexp for Borland C++; the combined one matched too much.
author Richard M. Stallman <rms@gnu.org>
date Sun, 31 Jul 1994 19:00:42 +0000
parents a9f95d2ac181
children 849045d64643
comparison
equal deleted inserted replaced
8397:4cb8a2ab8f60 8398:38513039d818
106 ;; /usr/src/foo/foo.c(8): warning: w may be used before set 106 ;; /usr/src/foo/foo.c(8): warning: w may be used before set
107 ;; or GNU utilities: 107 ;; or GNU utilities:
108 ;; foo.c:8: error message 108 ;; foo.c:8: error message
109 ;; or HP-UX 7.0 fc: 109 ;; or HP-UX 7.0 fc:
110 ;; foo.f :16 some horrible error message 110 ;; foo.f :16 some horrible error message
111 ;; or Borland C++:
112 ;; Error ping.c 15: Unable to open include file 'sys/types.h'
113 ;; Warning ping.c 68: Call to function 'func' with no prototype
114 ;; 111 ;;
115 ;; We refuse to match file:number:number 112 ;; We refuse to match file:number:number
116 ;; 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).
117 ;; 114 ;;
118 ;; 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
119 ;; paren, because otherwise this matches just about anything 116 ;; paren, because otherwise this matches just about anything
120 ;; containing a number with spaces around it. 117 ;; containing a number with spaces around it.
121 ("\n\\(Error \\|Warning \\)?[ \t]*\\([^:( \t\n]+\\)\ 118 ("\n\\([^:( \t\n]+\\)[:(][ \t]*\\([0-9]+\\)\\([) \t]\\|:[^0-9\n]\\)" 2 3)
122 \[:(]?[ \t]*\\([0-9]+\\)\\([) \t]\\|:[^0-9\n]\\)" 2 3) 119
120 ;; Borland C++:
121 ;; Error ping.c 15: Unable to open include file 'sys/types.h'
122 ;; Warning ping.c 68: Call to function 'func' with no prototype
123 ("\n\\(Error\\|Warning\\) \\([^:( \t\n]+\\)\
124 \\([0-9]+\\)\\([) \t]\\|:[^0-9\n]\\)" 2 3)
123 125
124 ;; 4.3BSD lint pass 2 126 ;; 4.3BSD lint pass 2
125 ;; strcmp: variable # of args. llib-lc(359) :: /usr/src/foo/foo.c(8) 127 ;; strcmp: variable # of args. llib-lc(359) :: /usr/src/foo/foo.c(8)
126 ("[ \t:]\\([^:( \t\n]+\\)[:(](+[ \t]*\\([0-9]+\\))[:) \t]*$" 1 2) 128 ("[ \t:]\\([^:( \t\n]+\\)[:(](+[ \t]*\\([0-9]+\\))[:) \t]*$" 1 2)
127 129