Skip to content

Instantly share code, notes, and snippets.

@splittist

splittist/example.lisp

Created April 26, 2021 10:44
Show Gist options
  • Save splittist/ba5e3ba2074419b69df78285ed6cb57c to your computer and use it in GitHub Desktop.
Save splittist/ba5e3ba2074419b69df78285ed6cb57c to your computer and use it in GitHub Desktop.
Download ZIP
Undernumber WIP
Raw
example.lisp
UNDERNUMBER> (let ((*readtable* (copy-readtable)))
(install-undernumber *readtable*)
(loop for answer = (read)
until (eq :q answer)
do (print answer) (terpri)))
#_b1001_1001 #_xFACE_CAFE #_123_456_789 #44_123,456,789 123
153
4207856382
123456789
123456789
123
:q
NIL
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment