Added IGNORE declaration for unused variable ACCEPT-OBJECT.
Wrapped DEFGENERIC form in EVAL-WHEN for compile-time effect.