在clojure中迭代时间序列的问题

(ns my-app.core
  (:import [java.time LocalDate Period]))

(defn date-range
  "生成一个时间序列"
  [start-date end-date]
  (let [step (Period/ofDays 1)]
    (iterate #(.plus % step) start-date)
    (take-while #(not (.isAfter % end-date)))))

(defn process-date
  "处理每个日期"
  [date]
  (println (str "处理日期：" date)))

(defn -main
  "主函数"
  [& args]
  (let [start-date (LocalDate/of 2022 1 1)
        end-date (LocalDate/of 2022 1 10)]
    (run! process-date (date-range start-date end-date))))