summaryrefslogtreecommitdiff
path: root/tests/vars4.bth
blob: 20820e3b080d2e22674a0624689653ac36e1b7bd (plain)
1
2
3
4
5
6
7
8
(do
	(set x 100)
	(puts x)
	(let (x 20)
		(puts x)
		(set x 30)
		(puts x))
	x)