Skip to content

Instantly share code, notes, and snippets.

@garlic0x1

garlic0x1/tilde-list.lisp

Created January 29, 2024 06:12
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 garlic0x1/56ab4b1b0aedab2829ed49fe7eff5637 to your computer and use it in GitHub Desktop.
Save garlic0x1/56ab4b1b0aedab2829ed49fe7eff5637 to your computer and use it in GitHub Desktop.
Download ZIP
CL shorthand list
Raw
tilde-list.lisp
(set-macro-character
#\~
(lambda (stream char)
(declare (ignore char))
`(list ,@(read stream t))))
;; USAGE:
(macroexpand (quote ~(1 2 3)))
;; => (LIST 1 2 3)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment