no ctor for Color.clj

(defn inside-byte [v]
  (cond 
   (< v 0) 0
   (> v 255) 255
   :else v))

(defn darker- [color fraction]
  (let [fr (- 1.0 fraction)
        red (inside-byte (-> (.getRed color) (* fr) Math/round))
        green (inside-byte (-> (.getGreen color) (* fr) Math/round))
        blue (inside-byte (-> (.getBlue color) (* fr) Math/round))
        alpha (.getAlpha color)]
    (Color. red green blue alpha)))

No matching ctor found for class java.awt.Color
[Thrown class java.lang.IllegalArgumentException]

When I type-hint the return, it works

(defn inside-byte [v](cond
%28< v 0%29 0
%28> v 255%29 255
:else %28int v%29))