diff --git a/src/clj/cljs/core.clj b/src/clj/cljs/core.clj index 13f1e3dedb..5c812dcf58 100644 --- a/src/clj/cljs/core.clj +++ b/src/clj/cljs/core.clj @@ -1641,3 +1641,6 @@ (lazy-cat xs ys zs) === (concat (lazy-seq xs) (lazy-seq ys) (lazy-seq zs))" [& colls] `(concat ~@(map #(core/list `lazy-seq %) colls))) + +(defmacro js-str [s] + (core/list 'js* "''+~{}" s)) diff --git a/src/cljs/cljs/core.cljs b/src/cljs/cljs/core.cljs index c04e2cbef1..61672e1d6d 100644 --- a/src/cljs/cljs/core.cljs +++ b/src/cljs/cljs/core.cljs @@ -2037,7 +2037,7 @@ reduces them without incurring seq initialization" ([] "") ([x] (if (nil? x) "" - (.toString x))) + (cljs.core/js-str x))) ([x & ys] (loop [sb (StringBuffer. (str x)) more ys] (if more