func2.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/func2.bth

blob: fd16eda15ac2c75024df39ac1b78caa7a91f14d9 (plain)

(do
	(set f1 (fn (a) (* a a)))
	(set f2 (fn (a b) (+ a b)))
	(puts (f1 6))
	(puts (f2 20 40))
	(f1 (f2 2 1)))