File tree Expand file tree Collapse file tree 1 file changed +9
-8
lines changed Expand file tree Collapse file tree 1 file changed +9
-8
lines changed Original file line number Diff line number Diff line change 4395
4395
((juxt :requires :require-macros :as-aliases )
4396
4396
(get-namespace ns ))))
4397
4397
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 ))))
4405
4406
4406
4407
#?(:clj
4407
4408
(defn forms-seq*
4803
4804
*unchecked-arrays* false ])
4804
4805
*cljs-ns* 'cljs.user
4805
4806
*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* {})]
4807
4808
(loop [ns nil forms forms last-ast nil ]
4808
4809
(if (some? forms)
4809
4810
(let [form (first forms)
You can’t perform that action at this time.
0 commit comments