1

我正在将我正在学习的解析技术付诸实践。我正在尝试在 Emacs 中编写一种编程模式，因此我可以利用语法高亮等。不幸的是，字体锁定不起作用。在谷歌上搜索并按照教程发现那里没有产生任何结果。下面是我的代码。任何建议表示赞赏。

;;;###autoload
(defgroup use-mode nil
  "Mode for editing Use source files."
  :group 'languages)

;;;###autoload
(defcustom use-mode-hook nil
  "Hook run when use-mode is started.")

(defvar use-mode-map (make-sparse-keymap)
"Keymap for use-mode.")

;;;###autoload
(add-to-list 'auto-mode-alist '("\\.use\\'" . use-mode))

(defvar use-keywords-1 '("use" . font-lock-keyword-face)
  "First level of font-lock in Use")

(defvar  use-font-lock-keywords use-keywords-1
  "Code highlighting.")

;;;###autoload
(define-derived-mode use-mode prog-mode "Use"
  "Major mode for editing Use source files."
  (setq font-lock-defaults '(use-font-lock-keywords)))

(provide 'use-mode)
4

1 回答 1

2

当您定义字体锁定关键字时，您应该提供一个条目列表。所以，如果你更换：

(defvar use-keywords-1 '("use" . font-lock-keyword-face)
  "First level of font-lock in Use")

使用以下内容，它将起作用：

(defvar use-keywords-1 '(("use" . font-lock-keyword-face))
  "First level of font-lock in Use")

请注意，除非您打算编写一个真正高级的系统，否则您不需要提供不同的级别，因此您可以删除*-1变量。

（以防你还没有看到它，我想推荐我的一个包font-lock-studio。它是一个用于字体锁定关键字的交互式调试器。）

于 2016-02-23T10:34:41.807 回答