X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fprimordial-type.lisp;h=e131dcd84d59b26567044738e860e156fedf33a6;hb=a7002797a1fb36ec3a7c30f6ebcb314b0e58e817;hp=96dcfbe8d2deed64fe22aac7038766e5b4866713;hpb=0aecc2b20142e08068c3434273500131cb13fe2d;p=sbcl.git

diff --git a/src/code/primordial-type.lisp b/src/code/primordial-type.lisp
index 96dcfbe..e131dcd 100644
--- a/src/code/primordial-type.lisp
+++ b/src/code/primordial-type.lisp
@@ -23,4 +23,5 @@
 ;;; a vector that maps type codes to layouts, used for quickly finding
 ;;; the layouts of built-in classes
 (defvar *built-in-class-codes*) ; initialized in cold load
+(defvar *null-classoid-layout*)
 (declaim (type simple-vector *built-in-class-codes*))