Skip to content

Instantly share code, notes, and snippets.

@sidgwick

sidgwick/abc.lisp

Created September 28, 2017 09:43
Show Gist options
  • Save sidgwick/474e6dd1a97f0ec9ee1de70acf205f5b to your computer and use it in GitHub Desktop.
Save sidgwick/474e6dd1a97f0ec9ee1de70acf205f5b to your computer and use it in GitHub Desktop.
Download ZIP
Raw
abc.lisp
(do ((i 1 (+ i 1)) (j 1 (+ j i)))
((> i 10) 'done)
(format t "square i is ~A~%" (* i i))
(format t "square j is ~A~%" (* j j)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment