Holger Schauer <schauer(a)coling.uni-freiburg.de> writes:
>>>>"MS" == Michael Sperber schrieb am 24 Aug
1998 13:50:54 +0200:
MS> Ah, now I see what you meant. Unfortunately, this approach works
MS> only with self-quoting values for BAR:
What Common Lisp are you using ?
USER(8): (setq bar #'(lambda (x) x))
#<Interpreted Function (unnamed) @ #x8cf772>
USER(9): (defmacro foo () bar)
FOO
USER(10): (let ((bar #'(lambda (x) (+ x 1)))) (funcall (foo) 23))
23
I may not understand all of the implications of the thread, but I'm
getting the identical results from clisp:
(setq bar #'(lambda (x) x))
#<CLOSURE :LAMBDA (X) X>
(defmacro foo () bar)
FOO
(let ((bar #'(lambda (x) (+ x 1)))) (funcall (foo) 23))
23
--
Hrvoje Niksic <hniksic(a)srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
"A Real Programmer's code can awe with its fiendish brilliance, even
as its crockishness appalls."