Skip to content

Latest commit

 

History

History
15 lines (9 loc) · 261 Bytes

README.md

File metadata and controls

15 lines (9 loc) · 261 Bytes
  • see lib/lib.lisp

  • (define fac (lambda (n) (if (== n 0) 1 (* n (fac (+ n -1))))))

  • macro

    (macro and (expr . rest)
        (if rest (list 'if expr (cons 'and rest)) expr))

    (and (== 1 1) (== 0 0) (if nil nil 1) (+ 100 100))
    (and ())