File tree
Expand file treeCollapse file tree2 files changed
+23
-2
lines changed Expand file treeCollapse file tree2 files changed
+23
-2
lines changed Original file line number | Diff line number | Diff line change |
---|
|
353 | 353 | (defn- load-macros [bound-vars k macros reload reloads opts cb]
|
354 | 354 | (if (seq macros)
|
355 | 355 | (let [nsym (first (vals macros))
|
356 |
| -k (or (k reload) |
| 356 | +k (or (reload k) |
357 | 357 | (get-in reloads [k nsym])
|
358 |
| -(and (= nsym name) (:*reload-macros* bound-vars) :reload))] |
| 358 | +(and (= nsym name) (:*reload-macros* bound-vars) :reload) |
| 359 | +nil)] |
359 | 360 | (require bound-vars nsym k
|
360 | 361 | (-> opts
|
361 | 362 | (assoc :macros-ns true)
|
|
Original file line number | Diff line number | Diff line change |
---|
|
154 | 154 | (is (= "1\n2\n" value))
|
155 | 155 | (inc! l))))))
|
156 | 156 |
|
| 157 | +(deftest test-eval-str-with-require-macros |
| 158 | +(async done |
| 159 | +(let [l (latch 2 done)] |
| 160 | +(cljs/eval-str st |
| 161 | +"(ns cljs.user (:require-macros [cljs.user.macros]))" |
| 162 | +nil |
| 163 | +{:eval node-eval |
| 164 | +:load (fn [_ cb] (cb {:lang :clj :source "(ns cljs.user.macros)"}))} |
| 165 | +(fn [{:keys [value error]}] |
| 166 | +(is (nil? error)) |
| 167 | +(inc! l))) |
| 168 | +(cljs/eval-str st |
| 169 | +"(ns cljs.user (:require-macros [cljs.user.macros :as cljs-user-macros]))" |
| 170 | +nil |
| 171 | +{:eval node-eval |
| 172 | +:load (fn [_ cb] (cb {:lang :clj :source "(ns cljs.user.macros)"}))} |
| 173 | +(fn [{:keys [error value]}] |
| 174 | +(is (nil? error)) |
| 175 | +(inc! l)))))) |
| 176 | + |
157 | 177 | #_(deftest test-eval-str-with-require
|
158 | 178 | (async done
|
159 | 179 | (let [l (latch 3 done)]
|
|
You can’t perform that action at this time.
0 commit comments