From 08f8ce154c6481b3fc5a1c16b6ab3061c7360aa8 Mon Sep 17 00:00:00 2001 From: Fogus Date: Fri, 17 Jan 2025 14:37:54 -0500 Subject: [PATCH] Added *wor* to interop heavy namespaces. --- src/main/clojure/clojure/tools/analyzer/jvm.clj | 2 ++ src/main/clojure/clojure/tools/analyzer/jvm/utils.clj | 2 ++ 2 files changed, 4 insertions(+) diff --git a/src/main/clojure/clojure/tools/analyzer/jvm.clj b/src/main/clojure/clojure/tools/analyzer/jvm.clj index 5559cdd..a63eb78 100644 --- a/src/main/clojure/clojure/tools/analyzer/jvm.clj +++ b/src/main/clojure/clojure/tools/analyzer/jvm.clj @@ -48,6 +48,8 @@ (:import (clojure.lang IObj RT Compiler Var) java.net.URL)) +(set! *warn-on-reflection* true) + (def ns-safe-macro "Clojure macros that are known to not alter namespaces" #{#'clojure.core/-> diff --git a/src/main/clojure/clojure/tools/analyzer/jvm/utils.clj b/src/main/clojure/clojure/tools/analyzer/jvm/utils.clj index eabee1d..a159c4e 100644 --- a/src/main/clojure/clojure/tools/analyzer/jvm/utils.clj +++ b/src/main/clojure/clojure/tools/analyzer/jvm/utils.clj @@ -16,6 +16,8 @@ (:import (clojure.lang RT Symbol Var) org.objectweb.asm.Type)) +(set! *warn-on-reflection* true) + (defn ^:private type-reflect [typeref & options] (apply reflect/type-reflect typeref