mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 03:40:56 -08:00
Code Issues Projects Releases Wiki Activity

(byte-optimize-lapcode): Don't bind

Browse source 
unused vars.  Treat byte-constant2 like byte-constant.  Fix bogus
comparison of opcode with operand.
This commit is contained in:
Dave Love 2000-10-02 17:44:51 +00:00
parent 2a099bccab
commit 944425c0c3
2 changed files with 9 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2000-10-02 Dave Love <fx@gnu.org>
* emacs-lisp/byte-opt.el (byte-optimize-lapcode): Don't bind
unused vars. Treat byte-constant2 like byte-constant. Fix bogus
comparison of opcode with operand.
2000-10-03 Miles Bader <miles@gnu.org>
* play/yow.el (yow): Don't display multi-line quotations in a *Help*

6
lisp/emacs-lisp/byte-opt.el
View file

@ -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