X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Ftoplevel.lisp;h=830c1c25aabdbec929db905fb1dc48a3f853c2b9;hb=47eb330ef0f3b99d24c0e24d897b757f16950c4b;hp=bcf7a422e6d6c7eda4d44f5d8b2dff32fe6b8932;hpb=75ae7b7af9433418836b65cde48713ab5b8cd2fd;p=sbcl.git diff --git a/src/code/toplevel.lisp b/src/code/toplevel.lisp index bcf7a42..830c1c2 100644 --- a/src/code/toplevel.lisp +++ b/src/code/toplevel.lisp @@ -25,9 +25,7 @@ ;;; specials initialized by !COLD-INIT ;;; FIXME: These could be converted to DEFVARs. -(declaim (special *gc-inhibit* *need-to-collect-garbage* - *after-gc-hooks* - #!+(or x86 x86-64) *pseudo-atomic-atomic* +(declaim (special #!+(or x86 x86-64) *pseudo-atomic-atomic* #!+(or x86 x86-64) *pseudo-atomic-interrupted* sb!unix::*interrupts-enabled* sb!unix::*interrupt-pending*