fix: defensive emission for static-field

Author: bronsa

src/main/clojure/clojure/tools/analyzer/passes/jvm/emit_form.clj

@@ -122,8 +122,10 @@
     `(new ~(-emit-form* class opts) ~@(mapv #(-emit-form* % opts) args))))
 
 (defmethod -emit-form :static-field
-  [{:keys [class field]} opts]
-  `(~(symbol (class->str class) (name field))))
+  [{:keys [class field overloaded-field?]} opts]
+  (if overloaded-field?
+    `(. ~(class->sym class) ~(symbol (str "-" (name field))))
+    (list (symbol (class->str class) (name field)))))
 
 (defmethod -emit-form :static-call
   [{:keys [class method args param-tags]} opts]

src/main/clojure/clojure/tools/analyzer/passes/jvm/validate.clj

@@ -175,10 +175,15 @@
     (validate-call (assoc ast :class (u/maybe-class (:class ast))))))
 
 (defmethod -validate :static-field
-  [ast]
-  (if (:validated? ast)
+  [{:keys [class validated? field] :as ast}]
+  (if validated?
     ast
-    (assoc ast :class (u/maybe-class (:class ast)))))
+    (let [class (u/maybe-class class)
+          overloaded-field? (boolean (some :return-type (u/static-members class field)))]
+      (assoc ast
+             :overloaded-field? overloaded-field?
+             :class class
+             :validated? true))))
 
 (defmethod -validate :instance-call
   [{:keys [class validated? instance] :as ast}]