blob: 3e1cad0f9b86bccdf1caf0ff9e3a5d6710d5d531 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
;; Copyright (c) Stephen C. Gilardi. 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-clojure
;;
;; Tests for the facilities provided by Clojure
;;
;; scgilardi (gmail)
;; Created 22 October 2008
(ns clojure.contrib.test-clojure
(:use clojure.contrib.test-is))
(def tests [:reader :evaluation :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))))
|
