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