(ns bar
  (:require [clojure.jvm.tools.analyzer :as jana]
            [clojure.tools.reader.edn :as edn]))

(def a (atom {}))

(defn foo [code]
  (binding [clojure.jvm.tools.analyzer/*eval-ast* false]
    (jana/analyze-form-in-ns
     'bar
     (edn/read-string code))))