Kiểm tra xem một lớp có phải là phân lớp của một lớp khác trong chung lisp

Question

Làm cách nào để xem liệu một lớp CLOS có phải là một lớp con của một lớp CLOS khác không?

Answer 1

Bạn có thể nhận CLASS-NAME của một lớp học.

Lớp học cũng có cùng tên.

Kiểm tra SUBTYPEP nếu loại là loại phụ của loại khác.

Answer 2

closer-mop cung cấp một vị subclassp

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