A macro to refer java static method

sfn.clj

(defmacro sfn
  "A macro that wraps java static method into a function, for example:

     ((sfn Integer/valueOf) \"1\")
     (map (sfn Math/sqrt) [1,2,3])
     (map (sfn Math/pow.2) (range 1 10) (range 1 10))

   The java static method passed in must be in the form of
   'Class/Method.arity'. If '.arity' is not present, it's 1 by default.
  "
  [f]
  (let [[f arity] (clojure.string/split (str f) #"\.")
        f (symbol f)
        args (repeatedly (Integer/parseInt (or arity "1")) gensym)]
    `(fn [~@args]
       (~f ~@args))))