From e623859c9604ee1a6994ef05d82cf91053d5aba8 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Tue, 30 Aug 2005 10:39:41 +0000 Subject: [PATCH] (font-lock-extra-managed-props, font-lock-keywords, font-lock-maximum-size, font-lock-support-mode): Add defvars. --- lisp/progmodes/compile.el | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index b41cc601fe7..9ac3aa5709d 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -70,6 +70,12 @@ (eval-when-compile (require 'cl)) +(defvar font-lock-extra-managed-props) +(defvar font-lock-keywords) +(defvar font-lock-maximum-size) +(defvar font-lock-support-mode) + + (defgroup compilation nil "Run compiler as inferior of Emacs, parse error messages." :group 'tools @@ -287,11 +293,11 @@ File = \\(.+\\), Line = \\([0-9]+\\)\\(?:, Column = \\([0-9]+\\)\\)?" \\(?:: \\(warning:\\)?\\|$\\| ),\\)" 1 2 nil (3)) (gcov-file - "^ +-: \\(0\\):Source:\\(.+\\)$" 2 1 nil 0) + "^ +-: \\(0\\):Source:\\(.+\\)$" 2 1 nil 0) (gcov-bb-file - "^ +-: \\(0\\):Object:\\(?:.+\\)$" nil 1 nil 0) + "^ +-: \\(0\\):Object:\\(?:.+\\)$" nil 1 nil 0) (gcov-never-called-line - "^ +\\(#####\\): +\\([0-9]+\\):.+$" nil 2 nil 2 nil + "^ +\\(#####\\): +\\([0-9]+\\):.+$" nil 2 nil 2 nil (1 compilation-error-face)) (gcov-called-line "^ +[-0-9]+: +\\([1-9]\\|[0-9]\\{2,\\}\\):.*$" nil 1 nil 0) -- 2.39.2