X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/6e6b09589b6f6d0b260fd022e6a3b189f7f7d352..456578422ddec347a6666b5a42559d4554f8c296:/src/class-finalize-impl.lisp

diff --git a/src/class-finalize-impl.lisp b/src/class-finalize-impl.lisp
index b51870c..9e75412 100644
--- a/src/class-finalize-impl.lisp
+++ b/src/class-finalize-impl.lisp
@@ -381,12 +381,6 @@
        (with-slots (chain-head chain chains) class
 	 (setf (values chain-head chain chains) (compute-chains class)))
 
-       ;; FIXME: make these slots autovivifying.
-       (with-slots ((ilayout %ilayout) effective-methods vtables) class
-	 (setf ilayout (compute-ilayout class))
-	 (setf effective-methods (compute-effective-methods class))
-	 (setf vtables (compute-vtables class)))
-
        ;; Done.
        (setf (sod-class-state class) :finalized)
        t)