              (cb (.toString sb)))))))))
 
 (defn compile
-  ([env source cb]
-   (compile env source nil cb))
-  ([env source opts cb]
+  ([state source cb]
+   (compile state source nil cb))
+  ([state source opts cb]
     (compile*
-      {:*compiler*     env
+      {:*compiler*     state
        :*cljs-ns*      'cljs.user
        :*ns*           (create-ns 'cljs.user)
        :*data-readers* tags/*cljs-data-readers*

             (cb))))))))

(defn load-deps
  ([bound-vars ana-env lib deps cb] (analyze-deps bound-vars lib deps nil cb))
  ([bound-vars ana-env lib deps opts cb]
   (let [compiler @(:*compiler* bound-vars)]
     (binding [ana/*cljs-dep-set* (vary-meta (conj (:*cljs-dep-set* bound-vars) lib)

               (cb (*eval-fn* js-source))))))))))

(defn eval-str
  ([state source cb]
   (eval-str state source nil cb))
  ([state source opts cb]
   (eval-str*
     {:*compiler*     state
      :*cljs-ns*      'cljs.user
      :*ns*           (create-ns 'cljs.user)
      :*data-readers* tags/*cljs-data-readers*
