diff options
author | tpratley <timothypratley@gmail.com> | 2009-10-02 09:53:30 +1000 |
---|---|---|
committer | Chouser <chouser@n01se.net> | 2009-11-24 10:17:41 -0500 |
commit | 5f9df70163bd9c7a168c1ef8cd2be67651401f29 (patch) | |
tree | 45eb208641d74064fb77ee2c80047550b22860a4 | |
parent | b65501e1b0707f4738570374e7a31cc0a3db81f0 (diff) |
Fixed broken test-embedded-constants. Fixes #164
Signed-off-by: Chouser <chouser@n01se.net>
-rw-r--r-- | test/clojure/test_clojure/compilation.clj | 10 |
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))))) |