func5.bth « tests - badthing - the best scheme that i have, and that's bad enough for me

summary refs log tree commit diff

path: root/tests/func5.bth

blob: 70fb0eaeea1cd5ac07f1eaa56bc571d3e2cd52fe (plain)

(set! f (fn (a) (say (* a a))))
(f 2)
(f 4)
(f 6)
(f 8)
(let (a 5)
	(f a)
	(f (* 2 a)))