diff --git a/src/test/clojure/clojure/tools/analyzer/jvm/core_test.clj b/src/test/clojure/clojure/tools/analyzer/jvm/core_test.clj index 7828ac0..8fc501b 100644 --- a/src/test/clojure/clojure/tools/analyzer/jvm/core_test.clj +++ b/src/test/clojure/clojure/tools/analyzer/jvm/core_test.clj @@ -108,3 +108,6 @@ (deftest analyze+eval-context-test (let [do-ast (ana.jvm/analyze+eval '(do 1 2 3))] (is (= :ctx/statement (-> do-ast :statements first :env :context))))) + +(deftest array_class + (is (ast1 (fn [^{:tag int/2} x] (instance? int/2 x)))))