diff --git a/pcl/defs.lisp b/pcl/defs.lisp index 565a0cd88deaa8d27280f4bd598afd5720887a43..8d510a430e870d88a624df122fcc0a706453a0ec 100644 --- a/pcl/defs.lisp +++ b/pcl/defs.lisp @@ -191,7 +191,8 @@ ;; exists so as to avoid undefined-function compiler warnings. The ;; skeleton class will be replaced at load-time with the correct object. ;; Earlier revisions (<= 1.17) of this function were essentially NOOPs. - + (declare (ignorable name)) + #+nil ;; This is causing problems with native compile of defcombin.lisp (when (and (eq *boot-state* 'complete) (null (lisp:find-class name nil))) (setf (lisp:find-class name)