summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authortpratley <timothypratley@gmail.com>2009-10-02 09:53:30 +1000
committerChouser <chouser@n01se.net>2009-11-24 10:17:41 -0500
commit5f9df70163bd9c7a168c1ef8cd2be67651401f29 (patch)
tree45eb208641d74064fb77ee2c80047550b22860a4
parentb65501e1b0707f4738570374e7a31cc0a3db81f0 (diff)
Fixed broken test-embedded-constants. Fixes #164
Signed-off-by: Chouser <chouser@n01se.net>
-rw-r--r--test/clojure/test_clojure/compilation.clj10
1 files changed, 8 insertions, 2 deletions
diff --git a/test/clojure/test_clojure/compilation.clj b/test/clojure/test_clojure/compilation.clj
index fba781ca..1d3a78a7 100644
--- a/test/clojure/test_clojure/compilation.clj
+++ b/test/clojure/test_clojure/compilation.clj
@@ -38,6 +38,12 @@
(deftest test-embedded-constants
(testing "Embedded constants"
- (are [t] (eval `(= t ~t/TYPE)))
- Boolean Byte Character Double Float Integer Long Short))
+ (is (eval `(= Boolean/TYPE ~Boolean/TYPE)))
+ (is (eval `(= Byte/TYPE ~Byte/TYPE)))
+ (is (eval `(= Character/TYPE ~Character/TYPE)))
+ (is (eval `(= Double/TYPE ~Double/TYPE)))
+ (is (eval `(= Float/TYPE ~Float/TYPE)))
+ (is (eval `(= Integer/TYPE ~Integer/TYPE)))
+ (is (eval `(= Long/TYPE ~Long/TYPE)))
+ (is (eval `(= Short/TYPE ~Short/TYPE)))))