Почему clojure thread last (- >>) макрос?

Question

Единственное преимущество, которое я могу видеть, это то, что он позволяет избежать звонков на partial.

(defn foldl [f acc xs] 
    (loop [acc acc 
     xs xs] 
    (if (empty? xs) 
     acc 
     (recur (f (first xs) acc) (rest xs))))) 

(defn $ [f x] (f x)) 

(defn thread-last [x & rest] 
    (foldl $ x rest)) 

, который дает:

(thread-last (range 10) 
      (partial map inc) 
      (partial filter odd?) 
      (partial reduce +)) => 25 

(->> (range 10) 
    (map inc) 
    (filter odd?) 
    (reduce +)) => 25 

Есть ли случаи, когда функционал/Явная версия потерпит неудачу?

Answer 1

Во-первых, обратите внимание, что ваш foldl - это всего лишь reduce. Наш язык не , что намного беднее, чем Haskell!

Во-вторых, не все формы являются функциональными вызовами, а ->> могут переписывать все формы. Например, вы могли бы использовать ->> реализовать что-то немного как where статей в Haskell:

(defn mapcat' [f xs] 
    (->> (apply concat mapped) 
     (let [mapped (map f xs)]))) 

Не совсем стиль, который пользуется популярностью у Clojure программистов, но он служит в качестве примера то, ->> может сделать это partial может» т.