dos2unix the files saved on Windows for proper viewing on repo.or.cz
[boalisp.git] / tests / if.boa
blobb57bdb5291a8ec32a286b4def1b25113e754f6b6
1 (set! var 23)
3 (if var
4     (print "yes")
5     (print "no"))
7 (if var
8     (begin
9       (display "foo")
10       (display "bar")))
12 (cond ((= var 21)
13        (print "**"))
14       ((= var 23)
15        (display "Else")
16        (print "stmt"))
17       ((= var 24)
18        (print "**")))
20 ;; TODO: COND with ELSE