From 98a602e3583233a6692c8dc16dfbf9d3bb90b2c0 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 4 Dec 1997 05:58:56 +0000 Subject: [PATCH] (byte-optimize-lapcode): Correctly distinguish byte-constant from operations on variables. --- lisp/emacs-lisp/byte-opt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 56dcc9e2427..be958e53abb 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -1826,7 +1826,7 @@ may generate incorrect code.") (setq lap0 (car rest) lap1 (nth 1 rest)) (if (memq (car lap0) byte-constref-ops) - (if (eq (cdr lap0) 'byte-constant) + (if (not (eq (car lap0) 'byte-constant)) (or (memq (cdr lap0) byte-compile-variables) (setq byte-compile-variables (cons (cdr lap0) byte-compile-variables))) -- 2.39.2