[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