diff options
| -rw-r--r-- | test/clojure/test_clojure/compilation.clj | 2 | ||||
| -rw-r--r-- | test/clojure/test_clojure/test.clj | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/test/clojure/test_clojure/compilation.clj b/test/clojure/test_clojure/compilation.clj index 1d3a78a7..2ee68002 100644 --- a/test/clojure/test_clojure/compilation.clj +++ b/test/clojure/test_clojure/compilation.clj @@ -19,7 +19,7 @@ (deftest test-compiler-metadata - (let [m ^#'when] + (let [m (meta #'when)] (are [x y] (= x y) (list? (:arglists m)) true (> (count (:arglists m)) 0) true diff --git a/test/clojure/test_clojure/test.clj b/test/clojure/test_clojure/test.clj index b96cb60f..002af625 100644 --- a/test/clojure/test_clojure/test.clj +++ b/test/clojure/test_clojure/test.clj @@ -73,7 +73,7 @@ (is (re-find #"cd" "abbabba") "Should fail")) (deftest #^{:has-meta true} can-add-metadata-to-tests - (is (:has-meta ^#'can-add-metadata-to-tests) "Should pass")) + (is (:has-meta (meta #'can-add-metadata-to-tests)) "Should pass")) ;; still have to declare the symbol before testing unbound symbols (declare does-not-exist) |