Index: /branches/ia32/compiler/X86/X8632/x8632-arch.lisp
===================================================================
--- /branches/ia32/compiler/X86/X8632/x8632-arch.lisp	(revision 8356)
+++ /branches/ia32/compiler/X86/X8632/x8632-arch.lisp	(revision 8357)
@@ -114,6 +114,6 @@
 (defx86reg imm0.w ax)
 (defx86reg imm0.b al)
-(defx86reg nargs ax)
-(defx86reg nargs.l eax)
+(defx86reg nargs.w ax)
+(defx86reg nargs eax)
 
 (defx86reg temp0 ecx)
@@ -180,4 +180,5 @@
 (defconstant nfixnumtagbits 2)
 (defconstant num-subtag-bits 8)
+(defconstant subtagmask 255)
 (defconstant fixnumshift 2)
 (defconstant fixnum-shift 2)
@@ -201,4 +202,10 @@
 (defconstant target-most-negative-fixnum (ash -1 (1- (- nbits-in-word nfixnumtagbits))))
 (defconstant target-most-positive-fixnum (1- (ash 1 (1- (- nbits-in-word nfixnumtagbits)))))
+
+;;; bits correspond to reg encoding used in instructions
+;;;  7   6   5   4   3   2   1   0
+;;; edi esi ebp esp ebx edx ecx eax
+
+(defconstant default-node-regs-mask #b11001110)
 
 ;;; 2-bit "lisptag" values
@@ -432,8 +439,4 @@
   foreign-sp
   db-link                               ; value of dynamic-binding link on thread entry.
-  save-save3                            ; saved nvrs (probably won't have any)
-  save-save2
-  save-save1
-  save-save0
   xframe                                ; exception-frame link
   pc                                    ; tra of catch exit/unwind cleanup