From d8382c9b8e5796af585f6eaca157fdeb47b8eb39 Mon Sep 17 00:00:00 2001 From: pw <pw> Date: Mon, 7 Aug 2000 13:50:21 +0000 Subject: [PATCH] Disable new code in inform-type-system-about-std-class which seems to trigger trouble when native compiling defcombin.lisp --- pcl/defs.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/pcl/defs.lisp b/pcl/defs.lisp index 565a0cd88..8d510a430 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) -- GitLab