The function dspec-primary-name
extracts the primary name from the canonical dspec dspec.
Note that for part classes this is the name of the aggregate definition, for example for methods it returns the name of the generic function.
LispWorks User Guide and Reference Manual - 13 Feb 2015