== ProcessingLisp

Lisp implementation in Processing.


== How to use

% ./run.sh
(car '(a b c))
(cdr '(a b c))
(cons 1 (cons 2 (cons 3 ())))
(defun fact (n) (if (eq n 0) 1 (* n (fact (- n 1)))))
(fact 10)
(defun fib (n) (if (eq n 1) 1 (if (eq n 0) 1 (+ (fib(- n 1)) (fib(- n 2))))))
(fib 12)
(defun gen (n) (lambda (m) (setq n (+ n m))))
(setq x (gen 100))
(x 10)
(x 90)
(x 300)
^D  # Control-D
a
(b c)
(1 2 3)
fact
3628800
fib
233
gen
<expr>
110
200
500