X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fgeneric%2Fobjdef.lisp;h=0a4daec9bbd962b4187cd45a7983bf721d3287dc;hb=dc5d8cef786c974258601109f79ab18f874b1270;hp=5bdd76a35d75249ec32ebd3199cabc14fbaeede6;hpb=8a09cf6e06fd6f5bbc7abfb4d9c4abee2658fa71;p=sbcl.git diff --git a/src/compiler/generic/objdef.lisp b/src/compiler/generic/objdef.lisp index 5bdd76a..0a4daec 100644 --- a/src/compiler/generic/objdef.lisp +++ b/src/compiler/generic/objdef.lisp @@ -381,6 +381,7 @@ ;; 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) + (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)