(let [name outer read-name (fn [] .name)] (let [name inner] (read-name)))