(defn
cljs-compiler-fn
[example forms cb]
(es/code->results
(into
[(str "(ns " (:ns-sym @*state) ")")]
(mapv (partial transform example) forms))
(fn [results] (->> results rest (mapv form->serializable) cb))
{:custom-load (fn [opts cb] (cb {:lang :clj, :source ""}))}))