compute-applicable-methods-using-classes
is not implemented.
compute-discriminating-function
is implemented and does return the discriminator but not through
compute-applicable-methods-using-classes
since LispWorks does not have that function. Moreover
add-method
does not call
compute-discriminating-function
because this would be inefficient when doing multiple calls to
add-method
. Instead,
compute-discriminating-function
is called when the generic function is called.