Re: Confused by behavior of LispWorks for code snippet




"Damien Kick" <dkixk@xxxxxxxxxxxxx> wrote in message news:13fu8dasl34l035@xxxxxxxxxxxxxxxxxxxxx
With LispWorks Personal Edition 5.0.1 (PowerPC), I see the following behavior:

[...]

I would've expected (EQ #'F #'G) => T. I am getting that result, i.e. (EQ #'F #'G) => T, with both Allegro CL 8.0 and Clisp. Is LispWorks mistaken or is that an allowable result?

No problem with LW Personal 5.0.1 on Windows XP!

clt


CL-USER 1 > (defparameter *x* #'(lambda () 13))
*X*

CL-USER 2 > *x*
#<anonymous interpreted function 2009D3EA>

CL-USER 3 > (setf (symbol-function 'f) *x*)
#<anonymous interpreted function 2009D3EA>

CL-USER 4 > (setf (symbol-function 'g) *x*)
#<anonymous interpreted function 2009D3EA>

CL-USER 5 > (eq #'f #'g)
T

CL-USER 6 > (eql #'f #'g)
T

CL-USER 7 > (eq *x* *x*)
T

.