Commit e5a85882 authored by Chong Yidong's avatar Chong Yidong
Browse files

Remove spurious debugging code.

parent 5ac8d2e8
......@@ -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)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment