handball/src/test/run-pass/closure/assign-shadowed-later.scm

; https://github.com/munificent/craftinginterpreters/blob/master/test/closure/assign_to_shadowed_later.lox

(define a 0)

(define (displayln x)
  (display x)
  (newline))

((lambda ()
   (define (assign)
     (set! a 1))

   (define a 2)
   (assign)
   (displayln a)))

(displayln a)