Join GitHub today
GitHub is home to over 50 million developers working together to host and review code, manage projects, and build software together.Sign up
GitHub is where the world builds software
Millions of developers and companies build, ship, and maintain their software on GitHub — the largest and most advanced development platform in the world.
== Oberon2Lisp Lisp implementation in Oberon-2. == How to use (with Oxford Oberon-2 Compiler) % obc -o lisp Lisp.m && ./lisp > (car '(a b c)) a > (cdr '(a b c)) (b c) > (cons 1 (cons 2 (cons 3 ()))) (1 2 3) > (defun fact (n) (if (eq n 0) 1 (* n (fact (- n 1))))) fact > (fact 10) 3628800 > (defun fib (n) (if (eq n 1) 1 (if (eq n 0) 1 (+ (fib(- n 1)) (fib(- n 2)))))) fib > (fib 12) 233 > (defun gen (n) (lambda (m) (setq n (+ n m)))) gen > (setq x (gen 100)) <expr> > (x 10) 110 > (x 90) 200 > (x 300) 500