git clone https://github.com/equwal/forthlisp
Log | Files | Refs
demo.lisp (166 bytes)
1 ;;; demo.lisp -- layer 1 input: host-dialect Lisp that host.lisp compiles to Forth words. 2 (defun sq (x) (* x x)) 3 (defun fact (n) (if (< n 2) 1 (* n (fact (- n 1)))))