0.9.6.32:

[sbcl.git] / src / compiler / x86-64 / parms.lisp

diff --git a/src/compiler/x86-64/parms.lisp b/src/compiler/x86-64/parms.lisp
index f80bbf2..06f0420 100644 (file)
--- a/src/compiler/x86-64/parms.lisp
+++ b/src/compiler/x86-64/parms.lisp
@@ -35,6 +35,10 @@
 ;;; addressable object
 (def!constant n-byte-bits 8)
 
+;;; The size in bytes of the GENCGC pages. Should be a multiple of the
+;;; architecture code size.
+(def!constant gencgc-page-size 4096)
+
 (def!constant float-sign-shift 31)
 
 ;;; comment from CMU CL:
@@ -89,6 +93,14 @@
 
 ;;; where to put the different spaces.
 
+;;; Currently the read-only and static spaces must be located in low
+;;; memory (certainly under the 4GB limit, very probably under 2GB
+;;; limit). This is due to the inability of using immediate values of
+;;; more than 32 bits (31 bits if you take sign extension into
+;;; account) in any other instructions except MOV. Removing this limit
+;;; would be possible, but probably not worth the time and code bloat
+;;; it would cause. -- JES, 2005-12-11
+
 (def!constant read-only-space-start     #x20000000)
 (def!constant read-only-space-end       #x27ff0000)
 
@@ -193,6 +205,7 @@
     *gc-inhibit*
     #!+sb-thread *stop-for-gc-pending*
     *gc-pending*
+    #!+sb-thread sb!thread::run-interruption
 
     *free-tls-index*
     *tls-index-lock*
@@ -209,6 +222,9 @@
     *fp-constant-0f0*
     *fp-constant-1f0*
 
+    ;; For GC-AND-SAVE
+    *restart-lisp-function*
+
     ;; The ..SLOT-UNBOUND.. symbol is static in order to optimise the
     ;; common slot unbound check.
     ;;