Isle Islisp: Islisp Implemented in Common Lisp
github.com3 pointsby ktg0 comments
-> (for ([i (in-range 1 16)])
(match (list (modulo i 3) (modulo i 5))
[(list 0 0) (displayln "fizzbuzz")]
[(list 0 _) (displayln "fizz")]
[(list _ 0) (displayln "buzz")]
[_ (displayln i)]))
Building LISP: http://www.lwh.jp/lisp/index.html
- Parser: http://www.lwh.jp/lisp/parser.html
Full source: https://github.com/kimtg/ToyLisp