Clojure: повторяющаяся анонимная функция с разной арностью

Question

Аналогично Clojure recur с множественной арностью Я бы хотел повторить с другой арностью.Но в моем случае я определяю функцию с помощью let, поскольку я хочу использовать другое значение из let (file-list), не передавая его:

(let [file-list (drive/list-files! google-drive-credentials google-drive-folder-id)
      download-file (fn
                      ([name]
                       (download-file ; <-- attempt to recur
                         name
                         (fn []
                           (throw
                             (ex-info
                               (str name " not found on Google Drive"))))))
                      ([name not-found-fn]
                       (if-let [file (->> file-list
                                          (filter #(= (:original-filename %)
                                                      name))
                                          first)]
                         (drive/download-file! google-drive-credentials file)
                         (not-found-fn))))]
  ;; #
  )

Я получаю эту ошибку: Exception in thread "main" java.lang.RuntimeException: Unable to resolve symbol: download-file in this context

Answer 1

Чтобы сделать сообщения об ошибках более читабельными, я часто добавляю -fn к внутреннему имени функции, например:

(let [download-file (fn download-file-fn [name] ...) ]
   <use download-file> ...)

Answer 2

Вы можете присвоить локальное имя fn:

(let [download-file (fn download-file
                      ([name] (download-file name (fn ...))))

, которое вы также можете использовать letfn:

(letfn [(download-file
          ([name] (download-file name (fn ...)))
          ([name not-found-fn] ...)])