[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
- To: JONL at MIT-MC
- From: KMP at MIT-MC (Kent M. Pitman)
- Date: Mon, 1 Dec 80 09:44:00 GMT
- Cc: (BUG LISP) at MIT-MC
- Original-date: 1 DEC 1980 0444-EST
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.