1 ;;;; This software is part of the SBCL system. See the README file for
4 ;;;; This software is derived from the CMU CL system, which was
5 ;;;; written at Carnegie Mellon University and released into the
6 ;;;; public domain. The software is in the public domain and is
7 ;;;; provided with absolutely no warranty. See the COPYING and CREDITS
8 ;;;; files for more information.
10 (in-package "SB!IMPL")
12 ;;; entries in STATIC-SYMBOLS table, references to which can be compiled
13 ;;; as though they're special variables
15 ;;; FIXME: These should be listed once and only once, instead of
16 ;;; listed here and then listed separately (and by now, 2001-06-06,
17 ;;; slightly differently) elsewhere.
18 (declaim (special *posix-argv
*
24 sb
!vm
:*read-only-space-free-pointer
*
25 sb
!vm
:*static-space-free-pointer
*
26 #!+immobile-space sb
!vm
:*immobile-fixedobj-free-pointer
*
27 #!+immobile-space sb
!vm
:*immobile-space-free-pointer
*
28 sb
!vm
:*current-catch-block
*
29 sb
!vm
::*current-unwind-protect-block
*
30 sb
!vm
::*alien-stack-pointer
*
31 sb
!vm
:*control-stack-start
*
32 sb
!vm
:*control-stack-end
*
33 sb
!vm
:*binding-stack-start
*
34 ;; FIXME: The pseudo-atomic variable stuff should be
35 ;; conditional on :SB-PSEUDO-ATOMIC-SYMBOLS, which
36 ;; should be conditional on :X86, instead of the
37 ;; pseudo-atomic stuff being directly conditional on
38 ;; :X86. (Note that non-X86 ports mention
39 ;; pseudo-atomicity too, but they handle it without
40 ;; messing with special variables.)
41 #!+(or x86 x86-64
) *pseudo-atomic-bits
*
42 #!+(or hpux
) sb
!vm
::*c-lra
*
43 *allow-with-interrupts
*
44 sb
!unix
::*unblock-deferrables-on-enabling-interrupts-p
*
47 #!+sb-thruption
*thruption-pending
*
48 #!+sb-safepoint
*gc-safe
*
49 #!+sb-safepoint
*in-safepoint
*
50 *free-interrupt-context-index
*
51 sb
!vm
::*allocation-pointer
*
52 sb
!vm
::*binding-stack-pointer
*
53 sb
!pcl
::..slot-unbound..
54 sb
!pcl
::*cache-miss-values-stack
*
55 sb
!pcl
::*dfun-miss-gfs-on-stack
*))
56 (!defvar sb
!vm
:*alloc-signal
* nil
)