From dbb7062045bdccb368b99be6e127a6e5f116f5b7 Mon Sep 17 00:00:00 2001 From: phg <phg> Date: Mon, 8 Feb 1993 17:39:23 +0000 Subject: [PATCH] Changed the definition of force-cache-flushes by removing unnecessary call to update-constructors, as suggested by Richard Harris. --- pcl/std-class.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/pcl/std-class.lisp b/pcl/std-class.lisp index 50e29e571..6ba1fb0ef 100644 --- a/pcl/std-class.lisp +++ b/pcl/std-class.lisp @@ -1022,8 +1022,7 @@ (wrapper-class-slots owrapper)) (without-interrupts (setf (slot-value class 'wrapper) nwrapper) - (invalidate-wrapper owrapper ':flush nwrapper)) - (update-constructors class))))) ;??? *** + (invalidate-wrapper owrapper ':flush nwrapper)))))) (defun flush-cache-trap (owrapper nwrapper instance) (declare (ignore owrapper)) -- GitLab