Re: GETF Speedup?
"Tim Bradshaw (as tfb at cley dot com)" <[email protected]>
| Newsgroups | gmane.lisp.lispworks.general |
|---|---|
| Message-ID | <[email protected]> |
Ouch: you're right. That makes my code technically unsafe. And getf really is useful only for properties which are symbols > On 13 Oct 2025, at 08:32, Devon Sean McCullough (as LispWorks at jovi dot net) <[email protected]> wrote: > > On 2025-10-12 11:07, Tim Bradshaw (as tfb at cley dot com) wrote: >> Note that getf is very limited: it can only use eql tests. > > GET, GETF, etc. use only EQ, never EQL. > > Peace > --Devon > > P.S. In CCL or SBCL > (defvar k (1+ most-positive-fixnum)) > (defvar k* (1+ most-positive-fixnum)) > (let ((x '())) > (setf (getf x k) 'cd) > (list (getf x k) (getf x k*) (eq k k*) (eql k k*))) > => (CD NIL NIL T) > > _______________________________________________ > Lisp Hug - the mailing list for LispWorks users > [email protected] > http://www.lispworks.com/support/lisp-hug.html _______________________________________________ Lisp Hug - the mailing list for LispWorks users [email protected] http://www.lispworks.com/support/lisp-hug.html