Defines a new CLOS class as
defclass
does. However, if none of the given superclasses is a subclass of
standard-kb-object
, then
standard-kb-object
is added to the list of superclasses.
(def-kb-class vehicle () ((driver :initarg :driver)))
(def-kb-class truck (vehicle)
((load :accessor truck-load)))