可能有一种更简单的方法,但是由于 cc-mode 在编译时准备字体化内容,我不确定如果不声明派生的 cc-mode (而不是简单地将它们全部添加font-lock-add-keywords
),您将如何获得字体化。
我相信,只需c-opt-*
在您的 . c-mode-hook
但是,这是一个示例派生模式,它将在mako-mode
从缓冲区调用之后字体化您的预处理器语句并提供正确的缩进(希望如此)。
(eval-when-compile
(require 'cc-langs)
(require 'cc-fonts))
(require 'cc-mode)
;;; create inherited mako-mode from c-mode
(eval-and-compile (c-add-language 'mako-mode 'c-mode))
;;; variables to control font-locking preprocessor stuff
(c-lang-defconst c-cpp-expr-intro-re mako
(concat "\\s *%\\s*" (regexp-opt '("if" "else" "endif")) ":?"))
(c-lang-defconst c-opt-cpp-prefix mako "\\s *%")
(c-lang-defconst c-opt-cpp-symbol mako "%")
(c-lang-defconst c-opt-cpp-start mako "\\s *%\\s *\\([[:alnum:]:]+\\)")
(defconst mako-font-lock-keywords-1 (c-lang-const c-matchers-1 mako))
(defconst mako-font-lock-keywords-2 (c-lang-const c-matchers-2 mako))
(defconst mako-font-lock-keywords-3 (c-lang-const c-matchers-3 mako))
(defvar mako-font-lock-keywords (c-lang-const c-matchers-3 mako))
(defun mako-font-lock-keywords ()
(c-compose-keywords-list mako-font-lock-keywords))
(defvar mako-mode-syntax-table nil)
(define-derived-mode mako-mode prog-mode "Mako"
:after-hook (c-update-modeline)
:syntax-table c-mode-syntax-table
;; initialize cc-mode stuff
(c-initialize-cc-mode t)
(c-init-language-vars mako-mode)
(c-common-init 'mako-mode))