Re: GETF Speedup?

"Devon Sean McCullough (as LispWorks at jovi dot net)" <[email protected]> Mon, 13 Oct 2025 02:30:55 -0500

Newsgroups	gmane.lisp.lispworks.general
Message-ID	<[email protected]>

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