summaryrefslogtreecommitdiff
path: root/tests/vars6.bth
blob: 30d385172ca410bc755664b18a779a35ba75ed54 (plain)
1
2
3
4
5
6
7
8
9
10
11
(do
	(let (a 100  b 200  c 300) (say b))
	(do
		(let (a 100  b 200  c 300) (say b))
		(def x 99)
		(say "hii")
		(say x)
		(let (a 100  b 200  c 300) (say b))
		(let (x 77) (say x))
		(say x))
	(let (a 100  b 200  c 300) (say b)))