(define (foo a b c) 0)
(print foo) ;; prints #<procedure (f_218 a1 b2 c3)>, bad!


(set! foo (lambda (x y z) 1))
(print foo) ;; prints #<procedure (foo x4 y5 z6)>, good!