summaryrefslogtreecommitdiff
path: root/src/bytecode.c
diff options
context:
space:
mode:
authorPaul Eggert <eggert@Penguin.CS.UCLA.EDU>2019-05-04 10:16:46 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2019-05-04 10:17:09 -0700
commit37963ed4991823fd1ee5cd2c485f22ac988259e2 (patch)
tree6e38280bd99ccc5925c539e44bbf39355c72b6c0 /src/bytecode.c
parenteec3ed05e3376d83df5501ca557edffaf2261b24 (diff)
downloademacs-37963ed4991823fd1ee5cd2c485f22ac988259e2.tar.gz
Fix bytecode optimization typo
Problem reported by Simon Frankau (Bug#35562). * src/bytecode.c (exec_byte_code): Fix typo when optimizing varset.
Diffstat (limited to 'src/bytecode.c')
-rw-r--r--src/bytecode.c2
1 files changed, 1 insertions, 1 deletions
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