handball/src/test/run-pass/closure/close-over-function-param.scm

(define f #f)

(define (foo param)
  (define (f_)
    (display param))
  (set! f f_))

(foo 77)

(f)