java_utils.clj: made as-str variadic like str, fixes #18

This commit also includes tests for this function.

1 files changed, 10 insertions, 0 deletions

diff --git a/src/clojure/contrib/test_contrib/java_utils.clj b/src/clojure/contrib/test_contrib/java_utils.clj
new file mode 100644
index 00000000..44901ad1
--- /dev/null
+++ b/src/clojure/contrib/test_contrib/java_utils.clj
@@ -0,0 +1,10 @@
+(ns clojure.contrib.test-contrib.java-utils
+  (:use clojure.test clojure.contrib.java-utils))
+
+(deftest t-as-str
+  (is (= "foo" (as-str "foo")))
+  (is (= "foo" (as-str 'foo)))
+  (is (= "foo" (as-str :foo)))
+  (is (= "[1 2 3]" (as-str [1 2 3])))
+  (is (= "Hello, World!" (as-str "Hello, " :World \!)))
+  (is (= (str {:foo :bar}) (as-str {:foo :bar}))))