handball/src/test/run-pass/closure/closed-closure-in-function.scm

11 lines
215 B
Scheme

; https://github.com/munificent/craftinginterpreters/blob/master/test/closure/closed_closure_in_function.lox
(define f #f)
((lambda ()
(define local 1)
(define (f_) (display local))
(set! f f_)
))
(f)