Skip to content
Snippets Groups Projects
Commit ea67a73a authored by pmai's avatar pmai
Browse files

Temporarily reverse the fix to SBCL bug 140, which breaks certain

cases of the instance-updating mechanism of PCL, until we fix those
issues, too.
parent e4f46e65
No related branches found
No related tags found
No related merge requests found
......@@ -26,7 +26,7 @@
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/braid.lisp,v 1.20 2002/05/25 02:42:52 pmai Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/braid.lisp,v 1.21 2002/07/03 10:57:17 pmai Exp $")
;;;
;;; Bootstrapping the meta-braid.
;;;
......@@ -566,7 +566,12 @@
(kernel:order-layout-inherits
(map 'simple-vector #'class-wrapper
(reverse (rest (class-precedence-list class))))))
(kernel:register-layout layout)
;; The invalidate nil is wrong, since it leaves the CMUCL type-system
;; with obsolete information, but fixing it requires extensive changes
;; to the PCL instance-updating mechanism, which relies on access to
;; the old wrapper.
(kernel:register-layout layout :invalidate nil)
;; Subclasses of formerly forward-referenced-class may be unknown
;; to lisp:find-class and also anonymous. This functionality moved
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment