(defun bar (function)
(foo `(lambda () (,function))))