Подтвердить что ты не робот

В Clojure как я могу реализовать стандартные интерфейсы коллекции Clojure для своих собственных записей и типов?

Я хочу создать абстракцию, которая представляет таблицу базы данных, но к которой можно получить доступ, используя все обычные Clojure seq и conj и все, что причудливо. Есть ли протокол, который мне нужно добавить?

Ответ 1

Да. Протокол определяется интерфейсом Java clojure.lang.ISeq. Вы можете расширить clojure.lang.ASeq, который предоставляет абстрактную реализацию.

Вот пример: a seq абстракция ресурса, который закрывается и автоматически закрывается, когда заканчивается seq. (Не строго протестировано)

(deftype CloseableSeq [delegate-seq close-fn]
  clojure.lang.ISeq
    (next [this]
      (if-let [n (next delegate-seq)]
        (CloseableSeq. n close-fn)
        (.close this)))
    (first [this] (if-let [f (first delegate-seq)] f (.close this)))
    (more [this] (if-let [n (next this)] n '()))
    (cons [this obj] (CloseableSeq. (cons obj delegate-seq) close-fn))
    (count [this] (count delegate-seq))
    (empty [this] (CloseableSeq. '() close-fn))
    (equiv [this obj] (= delegate-seq obj))
  clojure.lang.Seqable 
    (seq [this] this)
  java.io.Closeable
    (close [this] (close-fn)))