clojure.data.priority-map's IKVReduce implementation doesn’t support `reduced`

Sat, 28 Sep 2024 23:52:55 +0000

Hi folks!

Just a heads-up that clojure.data.priority-map’s IKVReduce implementation doesn’t support reduced.

The current implementation (v1.2.0, 2024-02-19):

clojure.core.protocols/IKVReduce
(kv-reduce [this f init]
  (if keyfn            
    (reduce-kv (fn [a k v] (reduce (fn [a v] (f a v (item->priority v))) a v))
      init priority->set-of-items)
    (reduce-kv (fn [a k v] (reduce (fn [a v] (f a v k)) a v))
      init priority->set-of-items)))

But the nested reduce means that something like this’d be needed:

(defn- convey-reduced [x] (if (reduced? x) (reduced x) x))

clojure.core.protocols/IKVReduce
(kv-reduce [this f init]
  (if keyfn            
    (reduce-kv (fn [a k v] (reduce (fn [a v] (convey-reduced (f a v (item->priority v))) a v)))
      init priority->set-of-items)
    (reduce-kv (fn [a k v] (reduce (fn [a v] (convey-reduced (f a v k)) a v)))
      init priority->set-of-items)))

Note that the issue affects only (reduce-kv a-priority-map …), not (reduce a-priority-map …).

Thanks, cheers! :-)

Answered: Add more developer info and Markdown markup to README

Wed, 26 Jun 2019 12:00:00 +0000

Reference: https://clojure.atlassian.net/browse/DPRIMAP-3 (reported by jafingerhut)

Answered: Add clojurescript support

Wed, 26 Jun 2019 12:00:00 +0000

Reference: https://clojure.atlassian.net/browse/DPRIMAP-8 (reported by desk@danielcompton.net)

Answered: Add support for subseq, rsubseq

Wed, 26 Jun 2019 12:00:00 +0000

Reference: https://clojure.atlassian.net/browse/DPRIMAP-5 (reported by jafingerhut)

Clojure Q&A - Recent questions and answers in data.priority-map

clojure.data.priority-map's IKVReduce implementation doesn’t support `reduced`

Answered: Add more developer info and Markdown markup to README

Answered: Add clojurescript support

Answered: Add support for subseq, rsubseq