diff --git a/pcl/boot.lisp b/pcl/boot.lisp index 22fd4edfe50f4626c24ed1205fc114d01a99760e..220a02c345b3f41f98ab700de4b74420e990916c 100644 --- a/pcl/boot.lisp +++ b/pcl/boot.lisp @@ -980,7 +980,7 @@ work during bootstrapping. (let ((bindings (mapcan #'process-var lambda-list))) `(let* ((,args-tail ,args) ,@bindings) - ,@(unless bindings `((declare (ignore ,args-tail)))) + (declare (ignorable ,args-tail)) ,@body))))) (defun get-key-arg (keyword list)