common-lisp - 在运行时定义类

Question

我正在尝试编写一个函数，该函数采用类（或类名）列表并返回一个将所有给定类作为超类的类。当两次给出相同的列表时，这应该再次返回相同的类，所以我使用哈希表进行记忆。我不能为此目的使用 defclass，因为它不评估它的 DIRECT-SUPERCLASSES 参数。我在 HyperSpec 中没有找到任何对应的函数。有什么办法可以便携吗？

Answer 1

只需创建 DEFCLASS 表单并使用 EVAL 对其进行评估。

您还可以使用 CLOS 函数 ENSURE-CLASS。