Function class-of

Syntax:

class-of object class

Arguments and Values:

object—an object.

class—a class object.

Description:

Returns the class of which the object is "an instance" -> "a direct instance" -kmp 15-Jan-91a direct instance.

Examples:

 (class-of 'fred) → #<BUILT-IN-CLASS SYMBOL 610327300>
 (class-of 2/3) → #<BUILT-IN-CLASS RATIO 610326642>
 
 (defclass book () ()) → #<STANDARD-CLASS BOOK 33424745>
 (class-of (make-instance 'book)) → #<STANDARD-CLASS BOOK 33424745>
 
 (defclass novel (book) ()) → #<STANDARD-CLASS NOVEL 33424764>
 (class-of (make-instance 'novel)) → #<STANDARD-CLASS NOVEL 33424764>

 (defstruct kons kar kdr) → KONS
 (class-of (make-kons :kar 3 :kdr 4)) → #<STRUCTURE-CLASS KONS 250020317>

Affected By:

None.

Exceptional Situations:

None.

See Also:

make-instance, type-of

Notes:

None.