projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.8.7.34:
[sbcl.git]
/
src
/
compiler
/
x86
/
parms.lisp
diff --git
a/src/compiler/x86/parms.lisp
b/src/compiler/x86/parms.lisp
index
6a1dbfe
..
701b42f
100644
(file)
--- a/
src/compiler/x86/parms.lisp
+++ b/
src/compiler/x86/parms.lisp
@@
-27,6
+27,10
@@
;;; the number of bits per word, where a word holds one lisp descriptor
(def!constant n-word-bits 32)
;;; the number of bits per word, where a word holds one lisp descriptor
(def!constant n-word-bits 32)
+;;; the natural width of a machine word (as seen in e.g. register width,
+;;; address space)
+(def!constant n-machine-word-bits 32)
+
;;; the number of bits per byte, where a byte is the smallest
;;; addressable object
(def!constant n-byte-bits 8)
;;; the number of bits per byte, where a byte is the smallest
;;; addressable object
(def!constant n-byte-bits 8)
@@
-222,6
+226,7
@@
sb!kernel::control-stack-exhausted-error
sb!di::handle-breakpoint
fdefinition-object
sb!kernel::control-stack-exhausted-error
sb!di::handle-breakpoint
fdefinition-object
+ #!+sb-thread sb!thread::handle-thread-exit
;; free pointers
;;
;; free pointers
;;
@@
-246,7
+251,6
@@
*free-interrupt-context-index*
*free-tls-index*
*free-interrupt-context-index*
*free-tls-index*
- sb!thread::*foreground-thread-stack*
*allocation-pointer*
*binding-stack-pointer*
*allocation-pointer*
*binding-stack-pointer*