Merge remote-tracking branch 'refs/remotes/origin/master'

Author: puredanger

.github/workflows/release.yml

@@ -4,10 +4,10 @@ on:
   workflow_dispatch:
     inputs:
       releaseVersion:
-        description: "Version to release"
+        description: "Version to release (i.e., 1.3.2)"
         required: true
       snapshotVersion:
-        description: "Snapshot version after release"
+        description: "Snapshot version after release (i.e., 1.3.3-SNAPSHOT)"
         required: true
 
 jobs:

CHANGELOG.md

@@ -2,6 +2,10 @@ Changelog
 ========================================
 Since tools.analyzer.jvm version are usually cut simultaneously with a tools.analyzer version, check also the tools.analyzer [CHANGELOG](https://github.com/clojure/tools.analyzer/blob/master/CHANGELOG.md) for changes on the corresponding version, since changes in that library will reflect on this one.
 - - -
+* Release 1.3.2 on 17 Jan 2025
+  * Removed reflection warnings on internal use of Character/isDigit
+* Release 1.3.1 on 2 Dec 2024
+  * Added support for Clojure 1.12 array class syntax
 * Release 1.3.0 on 19 Feb 2024
   * Bumped deps on parent pom, tools.analyzer, core.memoize, tools.reader
 * Release 1.2.3 on 26 Nov 2022

README.md

@@ -119,15 +119,15 @@ YourKit is kindly supporting open source projects with its full-featured Java Pr
 Releases and Dependency Information
 ========================================
 
-Latest stable release: 1.3.0
+Latest stable release: 1.3.2
 
 * [All Released Versions](https://search.maven.org/#search%7Cgav%7C1%7Cg%3A%22org.clojure%22%20AND%20a%3A%22tools.analyzer.jvm%22)
 * [Development Snapshot Versions](https://oss.sonatype.org/index.html#nexus-search;gav%7Eorg.clojure%7Etools.analyzer.jvm%7E%7E%7E)
 
 [Leiningen](https://github.com/technomancy/leiningen) dependency information:
 
 ```clojure
-[org.clojure/tools.analyzer.jvm "1.3.0"]
+[org.clojure/tools.analyzer.jvm "1.3.2"]
 ```
 
 [Maven](https://maven.apache.org/) dependency information:
@@ -136,7 +136,7 @@ Latest stable release: 1.3.0
 <dependency>
   <groupId>org.clojure</groupId>
   <artifactId>tools.analyzer.jvm</artifactId>
-  <version>1.3.0</version>
+  <version>1.3.2</version>
 </dependency>
 ```
 

pom.xml

@@ -2,7 +2,7 @@
 <project xmlns="http://maven.apache.org/POM/4.0.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://maven.apache.org/POM/4.0.0 http://maven.apache.org/maven-v4_0_0.xsd">
   <modelVersion>4.0.0</modelVersion>
   <artifactId>tools.analyzer.jvm</artifactId>
-  <version>1.3.2-SNAPSHOT</version>
+  <version>1.3.3-SNAPSHOT</version>
   <name>tools.analyzer.jvm</name>
   <description>Additional jvm-specific passes for tools.analyzer</description>
 

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/->
@@ -128,7 +130,7 @@
                          (maybe-class-literal sym-ns))]          ;; Class/field
       (let [opname (name form)]
         (if (and (= (count opname) 1)
-                 (Character/isDigit (first opname)))
+                 (Character/isDigit (char (first opname))))
           form ;; Array/<n>
           (with-meta (list '. target (symbol (str "-" opname))) ;; transform to (. Class -field)
             (meta form))))

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
@@ -96,7 +98,7 @@
 (defn maybe-array-class-sym [x]
   (let [sname (name x)]
     (if-let [c (and (= (count sname) 1)
-                    (Character/isDigit (first sname))
+                    (Character/isDigit (char (first sname)))
                     (namespace x))]
       (when-let [c (or (specials c)
                        (maybe-class-from-string c))]