X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fgeneric%2Fearly-objdef.lisp;h=b90d8a8d23cce05e0ac4c4d703b44dd6bb3f7549;hb=fb2f167e3ea360de1eb1c436de948df5086a6292;hp=9ce39f8f8de43e4b8d9177355ffb4db7e543555b;hpb=f1ffbf976aaa50b7b22f126b97e34afe06a91210;p=sbcl.git diff --git a/src/compiler/generic/early-objdef.lisp b/src/compiler/generic/early-objdef.lisp index 9ce39f8..b90d8a8 100644 --- a/src/compiler/generic/early-objdef.lisp +++ b/src/compiler/generic/early-objdef.lisp @@ -145,8 +145,11 @@ instance-header ; 01010010 fdefn ; 01010110 - unused00 ; 01011010 - unused01 ; 01011110 + no-tls-value-marker ; 01011010 + #!-(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)