Changeset 8075

Timestamp:

Jan 14, 2008, 7:09:36 PM (17 years ago)

Author:

R. Matthew Emerson

Message:

Try to get misc-dfloat-offset right; add scratch-mxcsr field to TCR.

The MXCSR fits in a 32 bit word, but must be read and written through
memory. On x86-64, we can put it in the upper part of a fixnum on the
stack, but that's not an option on IA-32, of course.

File:

• branches/ia32/compiler/X86/X8632/x8632-arch.lisp (modified) (2 diffs)

branches/ia32/compiler/X86/X8632/x8632-arch.lisp

@@ -347 +347 @@
 (defconstant misc-subtag-offset misc-header-offset)
 (defconstant misc-data-offset (+ misc-header-offset node-size))
-(defconstant misc-dfloat-offset ( + misc-data-offset 8))
+(defconstant misc-dfloat-offset ( + misc-header-offset 8))
 
 (defconstant max-64-bit-constant-index (ash (+ #x7fff x8632::misc-dfloat-offset) -3))
@@ -601 +601 @@
   ldt-index
   ldt-selector
+  scratch-mxcsr                         ;used for reading/writing mxcsr
 )