[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
MACROEXPANDED not working with SETF
- To: (BUG LISP) at MIT-MC
- Subject: MACROEXPANDED not working with SETF
- From: GJC at MIT-MC (George J. Carrette)
- Date: Tue, 28 Oct 80 22:25:00 GMT
- Original-date: 28 OCT 1980 1825-EDT
; I suppose you know about this already, but here it is
(setq x '(nil nil))
(defmacro foo (m) `(car ,m))
(defun c-b (l v) (setf (foo l) v))
(c-b x 9)
(defmacro foo (m) `(cadr ,m))
(c-b x 99)
; It is evident from the SETF MACROEXPANDED form that it doesn't
; remember the "versions" of all the macros it had to forcebly
; expand in order to do its own expansion.
; Might as well not bother with the MACROMEMO scheme and just have
; all macros displace if it isn't going to work in the one of
; the most common cases, SETF.
; By the way, I think its a win that SETF is a macro anyway.