munged vars can also rarely be invalid identifiers (addendum to #10)

jgpc42 · Jan 14, 2023 · a34059b · a34059b
1 parent ca59c72
commit a34059b
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/src/jmh/env.clj b/src/jmh/env.clj
@@ -176,9 +176,10 @@
 
 (defn- munge-method-suffix [b]
   (let [s (munge (name (:name b (:fn b))))]
-    (if (or (not (:name b)) (java-identifier? s))
+    (if (java-identifier? s)
       s
-      (throw (ex-info (format "benchmark name %s, after munging, is invalid identifier" (:name b))
+      (throw (ex-info (format "benchmark %s %s, after munging, is invalid identifier"
+                              (if (:name b) "name" "var") (or (:name b) (:fn b)))
                       {:name (:name b), :munged s})))))
 
 (defn finalize-benchmarks