LISP中宏的谓词是什么

Question

如果符号代表lisp中的宏，有人会知道测试的谓词是什么？

Answer 1

您可以使用macro-function：

CL-USER> (defmacro foo () ''foo)
FOO
CL-USER> (defun bar () 'bar)
BAR
CL-USER> (macro-function 'foo)
#<Compiled-function FOO Macroexpander #x187F0026>
CL-USER> (macro-function 'bar)
NIL