X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Finterr.c;h=7de06f06d67126b6b6e3ed5757beb742ead00401;hb=f73c1f391342c797b8daebe4e8c27e5923341b6d;hp=cb465733844aa0b13960ab0cb6259bf0de3b8ea5;hpb=9ab3c4123f5802bc5d4771eda564680d1a2c1a2f;p=sbcl.git

diff --git a/src/runtime/interr.c b/src/runtime/interr.c
index cb46573..7de06f0 100644
--- a/src/runtime/interr.c
+++ b/src/runtime/interr.c
@@ -114,7 +114,7 @@ describe_internal_error(os_context_t *context)
 
 	case sc_BaseCharReg:
 	    ch = *os_context_register_addr(context, offset);
-#ifdef __i386__
+#ifdef LISP_FEATURE_X86
 	    if (offset&1)
 		ch = ch>>8;
 	    ch = ch & 0xff;