[Openmcl-cvs-notifications] r10673 - /trunk/source/lisp-kernel/lisp-debug.c

gb at clozure.com gb at clozure.com
Wed Sep 10 00:01:33 EDT 2008


Author: gb
Date: Wed Sep 10 00:01:33 2008
New Revision: 10673

Log:
use 'eflags_register', not REG_IFL.

Modified:
    trunk/source/lisp-kernel/lisp-debug.c

Modified: trunk/source/lisp-kernel/lisp-debug.c
=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/lisp-kernel/lisp-debug.c (original)
+++ trunk/source/lisp-kernel/lisp-debug.c Wed Sep 10 00:01:33 2008
@@ -683,7 +683,7 @@
   fprintf(stderr,"%%rsi =3D 0x%016lX      %%r14 =3D 0x%016lX\n", xpGPR(xp,=
REG_RSI),xpGPR(xp,REG_R14));
   fprintf(stderr,"%%rdi =3D 0x%016lX      %%r15 =3D 0x%016lX\n", xpGPR(xp,=
REG_RDI),xpGPR(xp,REG_R15));
   fprintf(stderr,"%%rip =3D 0x%016lX   %%rflags =3D 0x%016lX\n",
-	  xpGPR(xp, Iip), xpGPR(xp, Iflags));
+	  xpGPR(xp, Iip), eflags_register(xp));
 #endif
 =

 #ifdef X8632



More information about the Openmcl-cvs-notifications mailing list