Clojure étendre l'arité Assotiative

Question

Je dois implémenter assoc personnalisé, mais il ne fonctionne pas avec plusieurs arguments. Il ne traite que la première paire. Il semble qu'il appelle directement assoc, pas via core assoc, puis RT/assoc.

(def my-assoc (reify 
       clojure.lang.Associative 
        (assoc [_ k v] 
        (println "assoc!!" k v)))) 

(assoc my-assoc :a 2 :b 3) ;; prints only :a 2 

Comment cela devrait-il être fait pour supporter la multi-arité?

Answer 1

println renvoie zéro. Retournez donc la valeur d'origine:

(def my-assoc (reify 
       clojure.lang.Associative 
       (assoc [m k v] 
        (println "assoc!!" k v) 
        m))) 

(assoc my-assoc :a 2 :b 3) ;; prints both