;; guile: 00
;; mes: 01
(define (x)
(define b 1)
(define (y) b)
(set! b 0)
(list b
(let ((b 2))
(y))))
(display (x))
(newline)
""