             [oxcart.pattern :as pattern]
             [clojure.tools.analyzer.ast :as ast]
             [clojure.tools.analyzer.passes.jvm.emit-form :refer [emit-form]]
-            [clojure.tools.analyzer.jvm :refer [update-ns-map!]]
             [clojure.tools.analyzer.passes.collect
              :refer [collect-closed-overs]]
             [clojure.set :refer [union]]))

        ;;    all the locals of the body expression.

        (let [bindings     (:bindings ast)
              locals->vars (atom {})]

          ;; create the forward defs
          (doseq [b bindings]

                                 fn*->cannonical-fn*
                                 (rewrite-fn* used-locals)))
              partial-form `(partial ~(symbol sym) ~@used-locals)
              def-ast      (util/ast def-form     (:env ast))
              partial-ast  (util/ast partial-form (:env ast))]

          ;; create the new def
