mirror of https://github.com/RainMark/lispoo.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
6 lines
140 B
6 lines
140 B
(prog
|
|
(set! i 3)
|
|
(while i (prog (message i) (set! i (+ i -1))))
|
|
(prog (set! x 0) (message (if x 1 2)))
|
|
(prog (set! x 1) (message x))
|
|
)
|
|
|