Hi,
I was trying to go through the Hyperspec in search of the above info.
Couls anybody point it to me?
The entry for defun mentions only "ordinary lambda list", but then how
do I define something like
(defun (setf gethash) (<How do I specify things here?>) ...)
I know I can use DEFSETF and friends. I am just curious about the
DEFUN alternative.
Cheers
--
Marco Antoniotti ===========================================
PARADES, Via San Pantaleo 66, I-00186 Rome, ITALY
tel. +39 - 06 68 10 03 17, fax. +39 - 06 68 80 79 26
http://www.parades.rm.cnr.it/~marcoxa
From: Robert Monfera
Subject: Re: (defun (setf xxx) <what kind of lambda list here?>
Date:
Message-ID: <38A1C07A.5EE8F342@fisec.com>
Marco Antoniotti wrote:
> The entry for defun mentions only "ordinary lambda list", but then how
> do I define something like
>
> (defun (setf gethash) (<How do I specify things here?>) ...)
Same as using DEFMETHOD: value comes first.
> (setf *a* 5)
5
> (defun *a*-accessor (n) (* *a* n))
*A*-ACCESSOR
> (*a*-accessor 7)
35
> (defun (setf *a*-accessor) (value n) (setf *a* (/ value n)))
(SETF *A*-ACCESSOR)
> (setf (*a*-accessor 3) 21)
7
> (*a*-accessor 3)
21
> *a*
7
>
Robert