;; -*- lisp -*-
(defun temp (a b c)
- (+= a 1)
- (+ a b c))
+ (cond ((> a 0)
+ (+= a 1)
+ (+ a b c))))
(cond
(0 (+ X 2 (* 3 4) (- 3 4)) (set X 4))
(set Y "abc")
(+= Y "def"))
(while (> X 7)
- (/= X 2))
- (set Y "ABC")
- (set Z (+ Y "def")))
+ (/= X 2) (+= X 1))
+ (cond ((> X 1)
+ (set Y "ABC")
+ (set Z (+ Y "def")))))
(insert "kkk")