Update to Java commit cf578d0 (2023.03.13): guard on no ns decl in JAR

Author: dmiller

src/main/clojure/clojure/tools/namespace/find.clj

@@ -161,10 +161,11 @@
                                                                                     ;;;                    (io/reader
                                                                                     ;;;                     (.getInputStream jarfile (.getEntry jarfile entry-name))))]
                                                                                     ;;;       (ignore-reader-exception
-                                                                                    ;;;         (let [[_ nom & more] (parse/read-ns-decl rdr read-opts)]
-                                                                                    ;;;           (list* 'ns (with-meta nom
-                                                                                    ;;;                        {:jar (.getName ^JarFile jarfile) :file entry-name})
-                                                                                    ;;;                  more)))))))
+                                                                                    ;;;         (let [[_ nom & more :as decl] (parse/read-ns-decl rdr read-opts)]
+                                                                                    ;;;           (when (and decl nom (symbol? nom))
+                                                                                    ;;;             (list* 'ns (with-meta nom
+                                                                                    ;;;                          {:jar (.getName ^JarFile jarfile) :file entry-name})
+                                                                                    ;;;                    more))))))))
 (defn find-ns-decls-in-jarfile
   "Searches the JAR file for source files containing (ns ...)
   declarations; returns the unevaluated ns declarations.