Проверьте, является ли класс подклассом другого класса в общем lisp Как узнать, является ли один CLOS-класс подклассом другого CLOS-класса? Ответ 1 Вы можете получить CLASS-NAME класса. Класс также имеет тип с тем же именем. SUBTYPEP проверяет, является ли тип подтипом другого типа. Ответ 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
Ответ 1 Вы можете получить CLASS-NAME класса. Класс также имеет тип с тем же именем. SUBTYPEP проверяет, является ли тип подтипом другого типа.
Ответ 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