File tree Expand file tree Collapse file tree
src/main/clojure/clojure/tools/analyzer/passes/jvm Expand file tree Collapse file tree Original file line number Diff line number Diff line change 3737 [{:keys [class field form env] :as ast}]
3838 (if-let [handle (-> (env/deref-env ) :passes-opts :validate/unresolvable-symbol-handler )]
3939 (handle class field ast)
40- (if (resolve-ns class env)
41- (throw (ex-info (str " No such var: " class)
42- (merge {:form form}
40+ (if-let [resolved-class (maybe-class-literal class)]
41+ (throw (ex-info (str " Cannot find method or field " field " for class "
42+ (.getName ^Class resolved-class))
43+ (merge {:class resolved-class
44+ :field field
45+ :form form}
4346 (source-info env))))
44- (throw (ex-info (str " No such namespace: " class)
45- (merge {:ns class
46- :form form}
47- (source-info env)))))))
47+ (if (resolve-ns class env)
48+ (throw (ex-info (str " No such var: " class)
49+ (merge {:form form}
50+ (source-info env))))
51+ (throw (ex-info (str " No such namespace: " class)
52+ (merge {:ns class
53+ :form form}
54+ (source-info env))))))))
55+
4856
4957(defmethod -validate :set!
5058 [{:keys [target form env] :as ast}]
You can’t perform that action at this time.
0 commit comments