Skip to content

Commit

Permalink
don't try to clj expand in cljs block
Browse files Browse the repository at this point in the history
This is harmful now, e.g. it loads the test namespace clj side even when
not needed. The cljs expander code should take care of the expansion.
  • Loading branch information
xificurC committed Nov 29, 2023
1 parent 593a5c3 commit 608a4b2
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/hyperfiddle/electric/impl/expand.clj
Original file line number Diff line number Diff line change
Expand Up @@ -43,7 +43,7 @@
(let [cljs-macro-env (cond-> cljs-env (::ns cljs-env) (assoc :ns (::ns cljs-env)))]
(if-some [expander (cljs-ana/get-expander f cljs-macro-env)]
(apply expander o cljs-macro-env args)
(macroexpand-clj o)))))
o))))
(macroexpand-clj o)))))))

(defn find-local [env sym] (find (:locals env) sym))
Expand Down

0 comments on commit 608a4b2

Please sign in to comment.