例如,在此宏定义中使用:
(defmacro with-eval-after-load-feature (feature &rest body)
(declare (indent 1) (debug t))
(let* ((feature (if (and (listp feature) (eq (car-safe feature) 'quote))
(cdr feature) feature))
(fs (if (listp feature) feature (list feature)))
(form (or (and (eval '(eval-when (compile)
(with-eval-after-load-feature-preload fs)))
'with-no-warnings)
'progn)))
`(,form ,@(with-eval-after-load-feature-transform fs body))))在这个文件中。
发布于 2015-11-07 20:37:50
它用于在反引号表达式中剪接。见C-h i g (elisp) Backquote RET。例如:
elisp> `(1 2 ,(list 3 4)) ; no splicing => nested list
(1 2
(3 4))
elisp> `(1 2 ,@(list 3 4)) ; splicing => flat list
(1 2 3 4)https://stackoverflow.com/questions/33586276
复制相似问题