[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[no subject]



Moreover, I suspect that in the case of 
 ((LAMBDA (F &FUNCTION G) (SETF #'G F) #'G) #'H)
or whatever syntax is or will eventually bind functions locally, you'd
want this to return #'H in compiled code. Making (SETF #'... ) mean the
same as (SETF (FSYMEVAL '...) ...) is like making (SETF sym ...) mean
the same as (SETF (EVAL 'sym) ...). You don't want to enforce a special
variable requirement to make things work. Now in Maclisp it turns out that
there are no local functions, so having (SETF #'F #'G) do something like
(PUTPROP 'F #'G 'EXPR) is an ok implementation; but you don't want that to
be its definition.