Mercurial > emacs
comparison lisp/progmodes/compile.el @ 2473:57e371b49128
(compilation-parse-errors): Remove debugging setq.
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Wed, 07 Apr 1993 19:57:10 +0000 |
| parents | f911936cec3f |
| children | 11bc604c077f |
comparison
equal
deleted
inserted
replaced
| 2472:f911936cec3f | 2473:57e371b49128 |
|---|---|
| 950 ;; Find out which individual regexp matched. | 950 ;; Find out which individual regexp matched. |
| 951 (setq alist error-regexp-groups) | 951 (setq alist error-regexp-groups) |
| 952 (while (and alist | 952 (while (and alist |
| 953 (null (match-beginning (car (car alist))))) | 953 (null (match-beginning (car (car alist))))) |
| 954 (setq alist (cdr alist))) | 954 (setq alist (cdr alist))) |
| 955 (setq losing-data (match-data)) | |
| 956 (if alist | 955 (if alist |
| 957 (setq alist (car alist)) | 956 (setq alist (car alist)) |
| 958 (error "compilation-parse-errors: impossible regexp match!")) | 957 (error "compilation-parse-errors: impossible regexp match!")) |
| 959 | 958 |
| 960 ;; Extract the file name and line number from the error message. | 959 ;; Extract the file name and line number from the error message. |