diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/boot.clj | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/clj/clojure/boot.clj b/src/clj/clojure/boot.clj index 4415d9bc..4f51ace9 100644 --- a/src/clj/clojure/boot.clj +++ b/src/clj/clojure/boot.clj @@ -315,10 +315,11 @@ ([#^Object x] (if (nil? x) "" (. x (toString)))) ([x & ys] - (loop [sb (new StringBuilder #^String (str x)) more ys] - (if more - (recur (. sb (append (str (first more)))) (rest more)) - (str sb))))) + ((fn [#^StringBuilder sb more] + (if more + (recur (. sb (append (str (first more)))) (rest more)) + (str sb))) + (new StringBuilder #^String (str x)) ys))) (defn symbol "Returns a Symbol with the given namespace and name." |