::::::::::::::
home/cmucl/em.err
::::::::::::::

  (PLEASINGNESS-METHOD SELF G E)
Warning: Function called with three arguments, but wants exactly two.

  (DISPLEASINGNESS-METHOD SELF G E)
Warning: Function called with three arguments, but wants exactly two.

  (DECAY-METHOD AFFECT (PCL::INSTANCE-READ 33 SELF 0))
Warning: Undefined function: DECAY-METHOD

--> PROGN DEFMETHOD PROGN PCL::LOAD-DEFMETHOD PCL::LOAD-DEFMETHOD FUNCTION LET
--> BLOCK LET COND IF COND IF COND IF COND IF PROGN PROGN
==>
  (STEF (PCL::INSTANCE-READ 5 SELF 0)
   (INSERT-AFFECT-METHOD SELF (MAKE* 'HATE-AFFECT #)
    (PCL::INSTANCE-READ 5 SELF 0)))
Warning: Undefined function: STEF