fork download
  1. (defmacro get-lexical-env []
  2. (into {} ; Thanks to amalloy for pointing me to into
  3. (for [s (keys &env)]
  4. [(list 'quote s) s])))
  5.  
  6. (println (get-lexical-env))
  7. (println (let [x 1 y 2 z 3] (get-lexical-env)))
Success #stdin #stdout 1.25s 220224KB
stdin
Standard input is empty
stdout
{}
{z 3, y 2, x 1}