Changeset 15585

Timestamp:

05/23/22 06:23:43 (10 months ago)

Author:

Mark Evenson

Message:

See ​https://github.com/armedbear/abcl/issues/465

File:

• trunk/abcl/src/org/armedbear/lisp/clos.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/clos.lisp

@@ -524 +524 @@
   ;; In case the class is already finalized, return
   ;; immediately, as per AMOP.
-  (when (class-finalized-p class)
-    (return-from std-finalize-inheritance))
+; (when (class-finalized-p class)
+;    (return-from std-finalize-inheritance))
   (setf (class-precedence-list class)
         (funcall (if (std-class-p class)