eliminate warning about intern for bootstrap cljs
This commit is contained in:
parent
2412d90f71
commit
c81ba0196f
2 changed files with 8 additions and 1 deletions
|
|
@ -66,6 +66,13 @@
|
|||
(macroexpand' x)
|
||||
x)) form))
|
||||
|
||||
#+clj
|
||||
(defn intern* [ns name val] (intern ns name val))
|
||||
|
||||
#+cljs
|
||||
(defn intern* [ns name val]
|
||||
(throw-illegal "intern not supported in ClojureScript"))
|
||||
|
||||
#+clj
|
||||
(defn do-macroexpand-all [form]
|
||||
(riddley/macroexpand-all form))
|
||||
|
|
|
|||
|
|
@ -496,7 +496,7 @@
|
|||
))
|
||||
]
|
||||
(if (= platform :clj)
|
||||
(intern *ns* cache-sym (i/mutable-cell)))
|
||||
(i/intern* *ns* cache-sym (i/mutable-cell)))
|
||||
`(let [info# ~get-cache-code
|
||||
|
||||
^com.rpl.specter.impl.CachedPathInfo info#
|
||||
|
|
|
|||
Loading…
Reference in a new issue