pnathan: elephant bypasses fence to drink from pool (Default)
2022-12-13 10:15 pm

Common Lisp DEFUN SETF - worked example

```

 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.