Skip to content

Instantly share code, notes, and snippets.

@jmercouris

jmercouris/bufferz.txt

Created December 19, 2017 21:23
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 jmercouris/472724f1e5a11b99dfad3ac3a987538c to your computer and use it in GitHub Desktop.
Save jmercouris/472724f1e5a11b99dfad3ac3a987538c to your computer and use it in GitHub Desktop.
Download ZIP
Raw
bufferz.txt
(defparameter *some-global* ())
(defun my-command ()
(with-results ((name (read-from-minibuffer :prompt "What is your name?"))
(age (read-from-minibuffer :prompt "What is your age?")))
(print name)
(print age)
(setf *some-global* name))
(print *some-global*))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment