1 ;;;; This file contains some parameterizations of various VM
2 ;;;; attributes common to all architectures.
4 ;;;; This software is part of the SBCL system. See the README file for
7 ;;;; This software is derived from the CMU CL system, which was
8 ;;;; written at Carnegie Mellon University and released into the
9 ;;;; public domain. The software is in the public domain and is
10 ;;;; provided with absolutely no warranty. See the COPYING and CREDITS
11 ;;;; files for more information.
15 (defparameter *c-callable-static-symbols
*
17 sb
!kernel
::internal-error
18 sb
!kernel
::control-stack-exhausted-error
19 sb
!kernel
::heap-exhausted-error
20 sb
!kernel
::undefined-alien-variable-error
21 sb
!kernel
::undefined-alien-function-error
22 sb
!kernel
::memory-fault-error
23 sb
!kernel
::unhandled-trap-error
24 sb
!di
::handle-breakpoint
25 sb
!di
::handle-single-step-trap
27 #!+sb-thread sb
!thread
::run-interruption
28 #!+win32 sb
!kernel
::handle-win32-exception
))
30 (defparameter *common-static-symbols
*
33 ;; filled in by the C code to propagate to Lisp
34 *posix-argv
* *core-string
*
36 ;; free pointers. Note that these are FIXNUM word counts, not (as
37 ;; one might expect) byte counts or SAPs. The reason seems to be
38 ;; that by representing them this way, we can avoid consing
39 ;; bignums. -- WHN 2000-10-02
40 *read-only-space-free-pointer
*
41 *static-space-free-pointer
*
43 ;; things needed for non-local-exit
45 *current-unwind-protect-block
*
54 *free-interrupt-context-index
*
55 sb
!unix
::*allow-with-interrupts
*
56 sb
!unix
::*interrupts-enabled
*
57 sb
!unix
::*interrupt-pending
*
63 ;; Dispatch tables for generic array access
64 sb
!impl
::*data-vector-reffers
*
65 sb
!impl
::*data-vector-setters
*
66 sb
!impl
::*data-vector-reffers
/check-bounds
*
67 sb
!impl
::*data-vector-setters
/check-bounds
*
69 ;; hash table weaknesses
75 ;;; Number of entries in the thread local storage. Limits the number
76 ;;; of symbols with thread local bindings.
77 (def!constant tls-size
4096)