comparison lisp/progmodes/compile.el @ 65228:d88a79e06702

(font-lock-extra-managed-props, font-lock-keywords, font-lock-maximum-size, font-lock-support-mode): Add defvars.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 30 Aug 2005 10:39:41 +0000
parents 0ef9e8908562
children d2d6a76016a7
comparison
equal deleted inserted replaced
65227:35c9b3d1f7df 65228:d88a79e06702
67 ;; buffer. 67 ;; buffer.
68 68
69 ;;; Code: 69 ;;; Code:
70 70
71 (eval-when-compile (require 'cl)) 71 (eval-when-compile (require 'cl))
72
73 (defvar font-lock-extra-managed-props)
74 (defvar font-lock-keywords)
75 (defvar font-lock-maximum-size)
76 (defvar font-lock-support-mode)
77
72 78
73 (defgroup compilation nil 79 (defgroup compilation nil
74 "Run compiler as inferior of Emacs, parse error messages." 80 "Run compiler as inferior of Emacs, parse error messages."
75 :group 'tools 81 :group 'tools
76 :group 'processes) 82 :group 'processes)
285 (4bsd 291 (4bsd
286 "\\(?:^\\|:: \\|\\S ( \\)\\(/[^ \n\t()]+\\)(\\([0-9]+\\))\ 292 "\\(?:^\\|:: \\|\\S ( \\)\\(/[^ \n\t()]+\\)(\\([0-9]+\\))\
287 \\(?:: \\(warning:\\)?\\|$\\| ),\\)" 1 2 nil (3)) 293 \\(?:: \\(warning:\\)?\\|$\\| ),\\)" 1 2 nil (3))
288 294
289 (gcov-file 295 (gcov-file
290 "^ +-: \\(0\\):Source:\\(.+\\)$" 2 1 nil 0) 296 "^ +-: \\(0\\):Source:\\(.+\\)$" 2 1 nil 0)
291 (gcov-bb-file 297 (gcov-bb-file
292 "^ +-: \\(0\\):Object:\\(?:.+\\)$" nil 1 nil 0) 298 "^ +-: \\(0\\):Object:\\(?:.+\\)$" nil 1 nil 0)
293 (gcov-never-called-line 299 (gcov-never-called-line
294 "^ +\\(#####\\): +\\([0-9]+\\):.+$" nil 2 nil 2 nil 300 "^ +\\(#####\\): +\\([0-9]+\\):.+$" nil 2 nil 2 nil
295 (1 compilation-error-face)) 301 (1 compilation-error-face))
296 (gcov-called-line 302 (gcov-called-line
297 "^ +[-0-9]+: +\\([1-9]\\|[0-9]\\{2,\\}\\):.*$" nil 1 nil 0) 303 "^ +[-0-9]+: +\\([1-9]\\|[0-9]\\{2,\\}\\):.*$" nil 1 nil 0)
298 ) 304 )
299 "Alist of values for `compilation-error-regexp-alist'.") 305 "Alist of values for `compilation-error-regexp-alist'.")