tisp

tiny lisp
git clone git://edryd.org/tisp
Log | Files | Refs | LICENSE

cond.tsp (223B)


      1 (cond)
      2 (cond (t 1))
      3 (cond ((= 1 1) 1) ((= 1 2) 2) (t 3))
      4 (cond ((= 1 2) 1) ((= 1 2) 2) (t (+ 1 2)))
      5 (cond ((= 1 2) 1) ((= 1 1) 2) (t 3))
      6 (cond ((= 1 2) 1) ((= 1 3) 2))
      7 (cond ((= 1 2) 1) ("foo" 2) (t 3))
      8 (cond (() (+ 1 2)))