diff options
Diffstat (limited to 'src/bytecode.c')
-rw-r--r-- | src/bytecode.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 6e91da11a1..7e7063e131 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -647,7 +647,7 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth, v1 = vectorp[op]; if (SYMBOLP (v1)) { - if (XSYMBOL (v1)->redirect != SYMBOL_PLAINVAL + if (SYMBOL_REDIRECT (XSYMBOL (v1)) != SYMBOL_PLAINVAL || (v2 = SYMBOL_VAL (XSYMBOL (v1)), EQ (v2, Qunbound))) { @@ -756,7 +756,7 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth, /* Inline the most common case. */ if (SYMBOLP (sym) && !EQ (val, Qunbound) - && !XSYMBOL (sym)->redirect + && !SYMBOL_REDIRECT (XSYMBOL (sym)) && !SYMBOL_CONSTANT_P (sym)) SET_SYMBOL_VAL (XSYMBOL (sym), val); else |