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