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

diff --git a/src/code/primordial-type.lisp b/src/code/primordial-type.lisp
index 96dcfbe..a89b208 100644
--- a/src/code/primordial-type.lisp
+++ b/src/code/primordial-type.lisp
@@ -19,8 +19,10 @@
 (defvar *universal-fun-type*)
 (defvar *instance-type*)
 (defvar *funcallable-instance-type*)
+(defvar *extended-sequence-type*)
 
 ;;; 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*))