Skip to content

Instantly share code, notes, and snippets.

@AeroNotix

AeroNotix/gist:4b2a0f5ad6420ba184bb30cfaafee1ad Secret

Last active August 12, 2018 12:20
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save AeroNotix/4b2a0f5ad6420ba184bb30cfaafee1ad to your computer and use it in GitHub Desktop.
Save AeroNotix/4b2a0f5ad6420ba184bb30cfaafee1ad to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
(defun foo (x)
(car x))
(defun (setf foo) (value x)
(setf (car x) value))
(let ((x 'foo)
(l (list 1 2 3)))
(funcall `(setf ,x) 213 l))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment