function | since v0.0-927 | Edit |
(load-stream repl-env filename res)
(defn load-stream [repl-env filename res]
(let [env (ana/empty-env)]
(with-open [rdr (io/reader res)]
(doseq [form (ana/forms-seq* rdr filename)]
(let [env (assoc env :ns (ana/get-namespace ana/*cljs-ns*))]
(evaluate-form repl-env env filename form))))))