diff options
Diffstat (limited to 'src/clojure/contrib/test_contrib.clj')
-rw-r--r-- | src/clojure/contrib/test_contrib.clj | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/src/clojure/contrib/test_contrib.clj b/src/clojure/contrib/test_contrib.clj deleted file mode 100644 index 69b624a7..00000000 --- a/src/clojure/contrib/test_contrib.clj +++ /dev/null @@ -1,45 +0,0 @@ -;; Copyright (c) Stuart Halloway. All rights reserved. The use and -;; distribution terms for this software are covered by the Eclipse Public -;; License 1.0 (http://opensource.org/licenses/eclipse-1.0.php) which can -;; be found in the file epl-v10.html 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-contrib -;; -;; Tests for the facilities provided by clojure-contrib -;; -;; stuart.halloway (gmail) - -(ns clojure.contrib.test-contrib - (:use [clojure.test :only (run-tests)]) - (:gen-class)) - -(def test-names - [:complex-numbers :fnmap :macro-utils :monads :pprint.pretty - :pprint.cl-format :str-utils :shell-out :test-graph - :test-dataflow :test-java-utils :test-lazy-seqs - :test-trace :test-jmx :java-utils :mock-test :mock-test.test-adapter-test - :seq-utils-test :with-ns-test]) - -(def test-namespaces - (concat - ['clojure.contrib.math.tests 'clojure.contrib.core.tests] - (map #(symbol (str "clojure.contrib.test-contrib." (name %))) - test-names))) - -(defn run - "Runs all defined tests" - [] - (println "Loading tests...") - (apply require :reload-all test-namespaces) - (apply run-tests test-namespaces)) - -(defn -main - "Run all defined tests from the command line" - [& args] - (run) - (System/exit 0)) - - |