测试一个类是否是普通lisp中另一个类的子类

Question

如何查看一个CLOS类是否是另一个CLOS类的子类？

Answer 1

您可以获得课程的CLASS-NAME。

一个类也有一个同名的类型。

SUBTYPEP测试类型是否是另一种类型的子类型。

Answer 2

closer-mop提供subclassp谓词

CL-USER> (c2mop:subclassp (find-class 'condition) (find-class 'error))
NIL
CL-USER> (c2mop:subclassp  (find-class 'error) (find-class 'condition))
T