eliminate most of cljs warnings except for one

This commit is contained in:
Nathan Marz 2016-06-01 20:54:04 -04:00
parent 187299b3d9
commit c1d9dff75e

View file

@ -43,14 +43,14 @@
(defn throw-illegal [& args] (defn throw-illegal [& args]
(throw (js/Error. (apply str args)))) (throw (js/Error. (apply str args))))
;; these macroexpand functions are for path macro in bootstrap cljs ;; these macroexpand functions are for path macro in bootstrap cljs
;; environment ;; environment
#+cljs #+cljs
(defn macroexpand' (defn macroexpand'
[form] [form]
(binding [cljs.js/*eval-fn* cljs.js/js-eval] (binding [^:cljs.analyzer/no-resolve cljs.js/*eval-fn*
(cljs.js/eval (cljs.js/empty-state) ^:cljs.analyzer/no-resolve cljs.js/js-eval]
(^:cljs.analyzer/no-resolve cljs.js/eval (^:cljs.analyzer/no-resolve cljs.js/empty-state)
`(macroexpand (quote ~form)) `(macroexpand (quote ~form))
identity))) identity)))