summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/byte-opt.el
diff options
context:
space:
mode:
authorVibhav Pant <vibhavp@gmail.com>2017-02-05 22:10:22 +0530
committerVibhav Pant <vibhavp@gmail.com>2017-02-05 22:10:22 +0530
commit74a3423b0b92b80d84f6de62d1f2d61c21e4bd90 (patch)
tree5b7041149368746f886c1f6b5632b3f8308599cf /lisp/emacs-lisp/byte-opt.el
parent382f6603ad4ba2a69b3961bdc68580ce77d222f9 (diff)
downloademacs-74a3423b0b92b80d84f6de62d1f2d61c21e4bd90.tar.gz
* byte-opt.el (byte-decompile-bytecode-1): Use eq instead of =.
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.