关于ELisp宏定义

SpringHan · 2020 年11 月 5 日 14:50

我最近在写一个Emacs插件，定义了一些宏。因为我用evil，之前也为evil定义过功能，发现evil的一些宏的参数有高亮(例如evil-define-motion)，但我定义的没有。
我看了一些宏的定义，没有发现是如何实现的，个人感觉可能是通过(declare)。有大神知道怎么实现吗？

BlindingDark · 2020 年11 月 6 日 05:23

github.com

jwiegley/use-package/blob/master/use-package-core.el#L312


      
                                (regexp-opt '("use-package" "require") t)
                                "\\s-+\\("))
                     (or (bound-and-true-p lisp-mode-symbol-regexp)
                         "\\(?:\\sw\\|\\s_\\|\\\\.\\)+") "\\)")
            "Sexp providing regexp for finding `use-package' forms in user files.
          This is used by `use-package-jump-to-package-form' and
          `use-package-enable-imenu-support'."
            :type 'sexp
            :group 'use-package)
          
          
(defcustom use-package-enable-imenu-support nil
            "If non-nil, cause imenu to see `use-package' declarations.
          This is done by adjusting `lisp-imenu-generic-expression' to
          include support for finding `use-package' and `require' forms.
          
          
Must be set before loading `use-package'."
            :type 'boolean
            :set
            #'(lambda (sym value)
                (eval-after-load 'lisp-mode
                  (if value