Mercurial > emacs
changeset 32078:038a08ffb9f8
(byte-optimize-lapcode): Don't bind
unused vars. Treat byte-constant2 like byte-constant. Fix bogus
comparison of opcode with operand.
author | Dave Love <fx@gnu.org> |
---|---|
date | Mon, 02 Oct 2000 17:41:20 +0000 |
parents | cc704eb2046a |
children | 14c5e673d8f1 |
files | lisp/emacs-lisp/byte-opt.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el Mon Oct 02 17:01:29 2000 +0000 +++ b/lisp/emacs-lisp/byte-opt.el Mon Oct 02 17:41:20 2000 +0000 @@ -1415,9 +1415,9 @@ (defun byte-optimize-lapcode (lap &optional for-effect) "Simple peephole optimizer. LAP is both modified and returned." - (let (lap0 off0 - lap1 off1 - lap2 off2 + (let (lap0 + lap1 + lap2 (keep-going 'first-time) (add-depth 0) rest tmp tmp2 tmp3