We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent caa4be8 commit e69d640Copy full SHA for e69d640
test/rewrite_clj/parser_test.clj
@@ -243,11 +243,12 @@
243
244
(deftest t-parsing-namespaced-maps-with-namespace-alias
245
(are [?s]
246
- (let [n (p/parse-string ?s)]
247
- (is (= :namespaced-map (node/tag n)))
248
- (is (= (count ?s) (node/length n)))
249
- (is (= ?s (node/string n)))
250
- (is (= {::node/x 1, ::node/y 1} (node/sexpr n))))
+ (binding [*ns* (find-ns 'rewrite-clj.parser-test)]
+ (let [n (p/parse-string ?s)]
+ (is (= :namespaced-map (node/tag n)))
+ (is (= (count ?s) (node/length n)))
+ (is (= ?s (node/string n)))
251
+ (is (= {::node/x 1, ::node/y 1} (node/sexpr n)))))
252
"#::node{:x 1, :y 1}"
253
"#::node {:x 1, :y 1}"))
254
0 commit comments