X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fgeneric%2Fobjdef.lisp;h=2f455da8c3170a04d7f3764ea692ae764b83a198;hb=ed891a4fd882d1b9fe066ab14bcf2107aea95baa;hp=5bdd76a35d75249ec32ebd3199cabc14fbaeede6;hpb=66cff1e1319861c080d563359afea284614b3a7f;p=sbcl.git

diff --git a/src/compiler/generic/objdef.lisp b/src/compiler/generic/objdef.lisp
index 5bdd76a..2f455da 100644
--- a/src/compiler/generic/objdef.lisp
+++ b/src/compiler/generic/objdef.lisp
@@ -381,6 +381,8 @@
   ;; Kept here so that when the thread dies we can releast the whole
   ;; memory we reserved.
   (os-address :c-type "void *" :length #!+alpha 2 #!-alpha 1)
+  #!+sb-thread
+  (os-attr :c-type "pthread_attr_t *" :length #!+alpha 2 #!-alpha 1)
   (binding-stack-start :c-type "lispobj *" :length #!+alpha 2 #!-alpha 1)
   (binding-stack-pointer :c-type "lispobj *" :length #!+alpha 2 #!-alpha 1)
   (control-stack-start :c-type "lispobj *" :length #!+alpha 2 #!-alpha 1)