Changeset 13909

Timestamp:

Jul 2, 2010, 9:46:36 PM (14 years ago)

Author:

Gary Byers

Message:

update some constant/struct definitions to match kernel.

File:

• branches/arm/compiler/ARM/arm-arch.lisp (modified) (4 diffs)

branches/arm/compiler/ARM/arm-arch.lisp

@@ -646 +646 @@
 (defconstant max-non-array-node-subtag (logior (ash 18 ntagbits) fulltag-nodeheader))
 
+(define-subtag stack-alloc-marker fulltag-imm 1)
 (define-subtag lisp-frame-marker fulltag-imm 2)
 (define-subtag character fulltag-imm 9)
@@ -659 +660 @@
 (defconstant undefined unbound-marker)
 (defconstant lisp-frame-marker subtag-lisp-frame-marker)
+(defconstant stack-alloc-marker subtag-stack-alloc-marker)
 
 (defconstant max-64-bit-constant-index (ash (+ #xfff arm::misc-dfloat-offset) -3))
@@ -690 +692 @@
 
 (defconstant double-float.value double-float.val-low)
+(defconstant double-float.value-cell double-float.val-low-cell)
 
 
@@ -722 +725 @@
   db-link                               ; value of dynamic-binding link on thread entry.
   xframe                                ; exception-frame link
+  last-lisp-frame
+  code-vector                           ; may not be useful
 
 )