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

blob: efd2b711fef4bbe7a2295c92527aaaba25bcba33 (plain)

(set f1 (fn (x) (+ x 10)))
(set f2 (fn (x) (* x 10)))
(set g (fn (f x) (say (f x)) (say (f x))))
(g f1 26)
(g f2 6)