为 LISP 宏描述

Question

我已经使用 CLISP 一段时间了，我想说，我终于开始“理解”宏了。现在我在这里有一个问题：是否有类似于函数描述但宏的描述？我想在我的宏中放置一个文档字符串，以便有人可以在我的宏上使用“describe-esk”函数/宏来查看它。如果这还不够清楚，也许这个代码示例会为您解决问题：

(defmacro while (test &body body)
  "sexier while loop - usage: (while (< x 10) (princ x) (setf x (+ x 1)))"
  (list 'loop 'while test 'do (cons 'progn body)))

(describe-macro 'while)
#=>sexier while loop - usage: (while (< x 10) (princ x) (setf x (+ x 1)))
#=>args: test, body

非常感谢。

Answer 1

使用documentation函数：

(documentation 'while 'function)

function 类型用于在表达式的函数位置使用的任何名称，因此它用于函数、宏和特殊运算符。

Answer 2

(documentation <x> 'function) 将为您提供 <x> 作为函数或宏的文档：

> (documentation 'collecting 'function)
"Collect things into a list forwards.

Within the body of this macro The form `(COLLECT THING)' will collect
THING into the list returned by COLLECTING.  COLLECT is a local
function so can be passed as an argument, or returned.  COLLECT
returns its argument. See WITH-COLLECTORS for which this COLLECTING is
now a shim"

describe也可能告诉你有用的东西。通常，像 SLIME 这样的编程环境也会提供各种有用的帮助。我不太了解 SLIME，但在 LW 中，当光标位于 collecting 上方时，Show Documentation 命令会弹出一个 window，显示

Documentation for (defmacro collecting):
Arguments: (&body forms)
<docstring as above>

为 LISP 宏描述

Describe for LISP-Macros

lisp

macros

clisp

common-lisp