Common Lisp DEFUN SETF - worked example
Dec. 13th, 2022 10:15 pm![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
```
CL-USER> (defun (setf bob) (object object2 object3)
(format t "Setting Bob ~a , ~a , ~a~&" object object2 object3))
(SETF BOB)
CL-USER> (setf (bob 'bob1 'bob2) 'bob3)
Setting Bob BOB3 , BOB1 , BOB2
NIL
```
Simple worked example I couldn't find on the general internet.