0.8.6.28:

[sbcl.git] / src / runtime / interr.c

diff --git a/src/runtime/interr.c b/src/runtime/interr.c
index cb46573..7de06f0 100644 (file)
--- 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;