class-name

(class-name class)

Returns the name symbol of a class metaobject -- what find-class and class-of answer. Signals when the argument is not a class metaobject.