diff options
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 93d76c52076..5215e6e9db7 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -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))) |