[Openmcl-cvs-notifications] r14175 - /trunk/source/compiler/X86/X8664/x8664-arch.lisp

[rme at clozure.com]

Author: rme
Date: Wed Aug 11 16:26:56 2010
New Revision: 14175

Log:
Arrange for the disassembler on Darwin and Windows to show r11 as
rcontext, and not save3.

Prefer temp2 (and not ra0) as the symbolic name for r10 everywhere.

Modified:
    trunk/source/compiler/X86/X8664/x8664-arch.lisp

Modified: trunk/source/compiler/X86/X8664/x8664-arch.lisp
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/compiler/X86/X8664/x8664-arch.lisp (original)
+++ trunk/source/compiler/X86/X8664/x8664-arch.lisp Wed Aug 11 16:26:56 2010
@@ -199,21 +199,24 @@
 (defx86reg temp1.w r9w)
 (defx86reg temp1.b r9b)
 =

+(defx86reg temp2 r10)
+(defx86reg temp2.l r10d)
+(defx86reg temp2.w r10w)
+(defx86reg temp2.b r10b)
+
 (defx86reg ra0 r10)
 (defx86reg ra0.l r10d)
 (defx86reg ra0.w r10w)
 (defx86reg ra0.b r10b)
 =

-(defx86reg temp2 r10)
-(defx86reg temp2.l r10d)
-(defx86reg temp2.w r10w)
-(defx86reg temp2.b r10b)
-
+#+(or darwin-target windows-target)
+(defx86reg rcontext r11)
 =

 (defx86reg save3 r11)
 (defx86reg save3.l r11d)
 (defx86reg save3.w r11w)
 (defx86reg save3.b r11b)
+
 =

 (defx86reg save2 r12)
 (defx86reg save2.l r12d)