Craig Lanning <[EMAIL PROTECTED]> writes:

[...]

Firstly, thank you very much for your efforts to track this down.

Could you please try the patch below?  Alas, I still can't construct a
test case myself that triggers these warnings, but I saw something in
the sources that definitely looks like a brain fart of mine, and 
that I think could cause such warnings.

(I think it would be necessary to recompile at least some of the
sources to see if it has an effect.)

(in-package :pcl)

(defmacro simple-lexical-method-functions
    ((lambda-list method-args next-methods &rest lmf-options) 
     &body body)
  `(let ((,method-args ,method-args)
         (,next-methods ,next-methods))
     (declare (ignorable ,method-args ,next-methods))
     (bind-simple-lexical-method-macros (,method-args ,next-methods)
       (bind-lexical-method-functions (,@lmf-options)
         (bind-args (,lambda-list ,method-args)
           ,@body)))))

Reply via email to