X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fgeneric%2Fobjdef.lisp;h=b3839eb205f325a229fd30bb556564698089bd5e;hb=992e6a70a0cae3f6d43bdbba18f77306fdf10662;hp=2d80149c6af3baedb3bd4495165ff02a30d9fb24;hpb=402958f92506b9d3de852601b8c1ccb99b5ee558;p=sbcl.git diff --git a/src/compiler/generic/objdef.lisp b/src/compiler/generic/objdef.lisp index 2d80149..b3839eb 100644 --- a/src/compiler/generic/objdef.lisp +++ b/src/compiler/generic/objdef.lisp @@ -395,7 +395,7 @@ (real :c-type "double" :length #!-x86-64 2 #!+x86-64 1) (imag :c-type "double" :length #!-x86-64 2 #!+x86-64 1)) -#!+(and sb-thread sb-lutex) +#!+sb-lutex (define-primitive-object (lutex :lowtag other-pointer-lowtag :widetag lutex-widetag