first cut at changes for Clojure SVN 1094+, my contribs and ones they depend on now load again

1 files changed, 32 insertions, 0 deletions

diff --git a/src/clojure/contrib/test_clojure.clj b/src/clojure/contrib/test_clojure.clj
new file mode 100644
index 00000000..60c19e35
--- /dev/null
+++ b/src/clojure/contrib/test_clojure.clj
@@ -0,0 +1,32 @@
+;;  Copyright (c) Stephen C. Gilardi. All rights reserved. The use and
+;;  distribution terms for this software are covered by the Common Public
+;;  License 1.0 (http://opensource.org/licenses/cpl.php) which can be found
+;;  in the file CPL.TXT at the root of this distribution. By using this
+;;  software in any fashion, you are agreeing to be bound by the terms of
+;;  this license. You must not remove this notice, or any other, from this
+;;  software.
+;;
+;;  clojure.contrib.test-clojure
+;;
+;;  Tests for the facilities provided by Clojure
+;;
+;;  scgilardi (gmail)
+;;  Created 22 October 2008
+
+(ns clojure.contrib.test-clojure
+  (:import (java.io File FilenameFilter))
+  (:use clojure.contrib.test-is))
+
+(def tests [:reader :printer :numbers])
+
+(defn test-name
+  [test]
+  (symbol (str "clojure.contrib.test-clojure." (name test))))
+
+(doseq [test tests]
+  (require (test-name test)))
+
+(binding [*test-out* (java.io.PrintWriter. *out*)]
+  (doseq [test tests]
+    (println "\n\n=====>" test)
+    (run-tests (test-name test))))