(def +envs+ (atom {}))
(defmacro get-&env []
(let [env-key (gensym)]
(swap! +envs+ assoc env-key &env)
`(@+envs+ '~env-key)))
(let [a 1] (println (get-&env)))
KGRlZiArZW52cysgKGF0b20ge30pKQoKKGRlZm1hY3JvIGdldC0mZW52IFtdCiAgKGxldCBbZW52LWtleSAoZ2Vuc3ltKV0KICAgIChzd2FwISArZW52cysgYXNzb2MgZW52LWtleSAmZW52KQogICAgYChAK2VudnMrICd+ZW52LWtleSkpKQoKKGxldCBbYSAxXSAocHJpbnRsbiAoZ2V0LSZlbnYpKSkKICA=