Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-20 11:57:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

(byte-optimize-lapcode): Fix format calls.

Browse source
This commit is contained in:
Richard M. Stallman 1995-07-21 20:57:25 +00:00
parent 297cdcfa8c
commit dec4e22e1d
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -1571,7 +1571,7 @@ may generate incorrect code.")
(if opt-p
(let ((tagstr
(if (eq 'TAG (car (car tmp)))
(format "%d:" (cdr (car tmp)))
(format "%d:" (car (cdr (car tmp))))
(or (car tmp) ""))))
(if (< i 6)
(apply 'byte-compile-log-lap-1
@ -1818,7 +1818,7 @@ may generate incorrect code.")
(setq tmp2 t))
(if tmp2
(byte-compile-log-lap
" %s [dup/%s]... %s\t-->\t%s dup..." lap0 lap0 lap0)))
" %s [dup/%s]...\t-->\t%s dup..." lap0 lap0 lap0)))
;;
;; unbind-N unbind-M --> unbind-(N+M)
;;