(in-package "SB!IMPL")
-(file-comment
- "$Header$")
-
;;; entries in STATIC-SYMBOLS table, references to which can be compiled
;;; as though they're special variables
+;;;
+;;; FIXME: These should be listed once and only once, instead of
+;;; listed here and then listed separately (and by now, 2001-06-06,
+;;; slightly differently) elsewhere.
(declaim (special *posix-argv*
*!initial-fdefn-objects*
*read-only-space-free-pointer*
sb!vm:*initial-dynamic-space-free-pointer*
*current-catch-block*
*current-unwind-protect-block*
- sb!c::*eval-stack-top*
sb!vm::*alien-stack*
- ;; KLUDGE: I happened to notice that these should be #!+X86.
- ;; There could easily be others in the list, too.
+ ;; FIXME: The pseudo-atomic variable stuff should be
+ ;; conditional on :SB-PSEUDO-ATOMIC-SYMBOLS, which
+ ;; should be conditional on :X86, instead of the
+ ;; pseudo-atomic stuff being directly conditional on
+ ;; :X86. (Note that non-X86 ports mention
+ ;; pseudo-atomicity too, but they handle it without
+ ;; messing with special variables.)
#!+x86 *pseudo-atomic-atomic*
#!+x86 *pseudo-atomic-interrupted*
sb!unix::*interrupts-enabled*
sb!vm::*fp-constant-l2e*
sb!vm::*fp-constant-lg2*
sb!vm::*fp-constant-ln2*
- sb!vm::*scavenge-read-only-space*
- sb!pcl::..slot-unbound..
- sb!vm::*x86-cgc-active-p*
- sb!vm::*static-blue-bag*))
+ sb!pcl::..slot-unbound..))