1.0.23.38: fix bug 430 (stack alloc by nested defstruct constructors)

[sbcl.git] / src / compiler / generic / early-objdef.lisp

diff --git a/src/compiler/generic/early-objdef.lisp b/src/compiler/generic/early-objdef.lisp
index 46bd930..b90d8a8 100644 (file)
--- a/src/compiler/generic/early-objdef.lisp
+++ b/src/compiler/generic/early-objdef.lisp
@@ -146,7 +146,10 @@
   fdefn                             ; 01010110
 
   no-tls-value-marker               ; 01011010
-  unused01                          ; 01011110
+  #!-(and sb-lutex sb-thread)
+  unused01
+  #!+(and sb-lutex sb-thread)
+  lutex                             ; 01011110
   unused02                          ; 01100010
   unused03                          ; 01100110
   unused04                          ; 01101010
@@ -219,5 +222,4 @@
 (defenum (:prefix vector- :suffix -subtype)
   normal
   unused
-  valid-hashing
-  must-rehash)
+  valid-hashing)