[no subject]

[George J. Carrette <GJC at MIT-MC>]

(setq Y '(1 2 3))

(setf (setq x (CAR y)) 100)

; Obscure format - SETF

I don't want to give anyone the idea that I sit
around thinking up these wierd things, this
was created by a macro.

(setf (progn (hprint "Howdy hacker") x) 99)

seems to work. So I would think the same
value-propagation code should work for SETQ. (****)

(****) (Sort-of-value).

What do people think about SETF through COND, DO, etc.
Obviously these have to be dealt with if an RMS-style
destructuring binder is going to be all it could be.

-gjc