Skip to content

Commit c0d3052

Browse files
authored
get-bridged-alias-map is not needed in self-hosted (#180)
1 parent b236032 commit c0d3052

File tree

1 file changed

+9
-8
lines changed

1 file changed

+9
-8
lines changed

src/main/clojure/cljs/analyzer.cljc

Lines changed: 9 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -4395,13 +4395,14 @@
43954395
((juxt :requires :require-macros :as-aliases)
43964396
(get-namespace ns))))
43974397

4398-
(defn get-bridged-alias-map
4399-
"Returns clojure.tools.reader/*alias-map* for bridging"
4400-
[]
4401-
(try
4402-
@(ns-resolve 'clojure.tools.reader '*alias-map*)
4403-
(catch Throwable t
4404-
nil)))
4398+
#?(:clj
4399+
(defn get-bridged-alias-map
4400+
"Returns clojure.tools.reader/*alias-map* for bridging"
4401+
[]
4402+
(try
4403+
@(ns-resolve 'clojure.tools.reader '*alias-map*)
4404+
(catch Throwable t
4405+
nil))))
44054406

44064407
#?(:clj
44074408
(defn forms-seq*
@@ -4803,7 +4804,7 @@
48034804
*unchecked-arrays* false])
48044805
*cljs-ns* 'cljs.user
48054806
*cljs-file* nil
4806-
reader/*alias-map* (or (get-bridged-alias-map) reader/*alias-map* {})]
4807+
reader/*alias-map* (or #?(:clj (get-bridged-alias-map)) reader/*alias-map* {})]
48074808
(loop [ns nil forms forms last-ast nil]
48084809
(if (some? forms)
48094810
(let [form (first forms)

0 commit comments

Comments
 (0)