From: handa Date: Wed, 22 Jul 2009 07:28:19 +0000 (+0000) Subject: *** empty log message *** X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e8259e5eba800cc1c2d35008e78f53e91f546a3f;p=m17n%2Fm17n-lib-cs.git *** empty log message *** --- diff --git a/eval.txt b/eval.txt index 6e4ca98..beec40f 100644 --- a/eval.txt +++ b/eval.txt @@ -1,2 +1,16 @@ -(+ 1 2 (* 3 4) (- 3 4)) +;; -*- lisp -*- +(progn + (cond + (0 (+ X 2 (* 3 4) (- 3 4))) + (1 (+= X 10))) + (if (> 20 X 10) + (progn + (<<= X 2) + (set Y "abc") + (+= Y "def")) + (while (> X 7) + (/= X 2)) + (set Y "ABC") + (set Z (+ Y "def"))) + (insert "kkk"))