mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-30 19:53:09 +00:00
Code Issues Releases Activity

Remove spurious debugging code.

Browse Source
This commit is contained in:
Chong Yidong 2007-04-09 16:33:01 +00:00
parent 5ac8d2e86d
commit e5a858825f
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/emacs-lisp/byte-opt.el
View File

@ -534,7 +534,6 @@
(eq tmp 'error-free)
;; Detect the expansion of (pop foo).
;; There is no need to compile the call to `car' there.
(progn (setq foo (list form fn)) nil)
(and (eq fn 'car)
(eq (car-safe (cadr form)) 'prog1)
(let ((var (cadr (cadr form)))