On Tue, 13 Jan 2004 09:04:20 +0100, Giannandrea Castaldi <[EMAIL PROTECTED]> wrote:
> I'm learning cl and have just passed to cmucl (on Gentoo
> distribution). I want to rexecute the code I've written reading the
> book On Lisp. I don't understand why I've the following problem
> executing this macro:
>
> (defmacro memq (obj lst)
> `(member ,obj ,lst :test #'eq))
That's probably because MEMQ is already defined in the EXT package.
You should use another name.
* (defmacro mem-eq (obj lst)
`(member ,obj ,lst :test #'eq))
MEM-EQ
* (mem-eq 1 '(1 2 3 4))
(1 2 3 4)
Edi.
