(defun (setf xwin-border-width) (width win)
(setf (xlib:drawable-border-width win) width))
那怎么调用上面的函数呢？实际上，我不真正理解“（setf xwin-border-width）”代替功能时间的含义是什么？
真诚的！
最佳答案
这定义了一个setf函数。您可以使用(setf (xwin-border-width *some-window*) width)调用它。
您可能会发现setf的文档很有用：http://www.lispworks.com/documentation/lw50/CLHS/Body/m_setf_.htm
Hyperspec还有一个关于通用引用的部分：http://www.lispworks.com/documentation/lw50/CLHS/Body/05_a.htm