summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/byte-opt.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/byte-opt.el')
-rw-r--r--lisp/emacs-lisp/byte-opt.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index edfa578f85b..146fbcc1cb6 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1405,7 +1405,7 @@
;; TAGs.
(let ((orig-table last-constant))
(cl-loop for e across constvec
- when (= e last-constant)
+ when (eq e last-constant)
do (setq last-constant (copy-hash-table e))
and return nil)
;; Replace all addresses with TAGs.