From 37963ed4991823fd1ee5cd2c485f22ac988259e2 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 4 May 2019 10:16:46 -0700 Subject: [PATCH] Fix bytecode optimization typo Problem reported by Simon Frankau (Bug#35562). * src/bytecode.c (exec_byte_code): Fix typo when optimizing varset. --- src/bytecode.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/bytecode.c b/src/bytecode.c index 40977799bfc..6f601cf0cd5 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -562,7 +562,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)->u.s.redirect + && XSYMBOL (sym)->u.s.redirect == SYMBOL_PLAINVAL && !SYMBOL_TRAPPED_WRITE_P (sym)) SET_SYMBOL_VAL (XSYMBOL (sym), val); else -- 2.39.2