LISP:从 class 实例中获取所有插槽名称

LISP: Get all slot names from an class instance

我需要用 class 的属性(它的插槽值)制作一个 window。

它类似于 describe 函数。

我的问题是:如何获取 class 的所有插槽名称?

我找不到任何关于它的信息,只有 describe 函数。

怎么样

(mapcar #'slot-definition-name (class-slots class))