Macro Condj Clojure-New?

Question

Tôi không hiểu mã này từ số clojure 1.5 release notes. Nó sử dụng macro cond->. Ví dụ, làm thế nào nó sẽ dịch thành mã trước 1.5?

user=> (cond-> 1 
       true inc 
       false (* 42) 
       (= 2 2) (* 3)) 
6 

Answer 1

Mỗi bước thay đổi kết quả nếu thử nghiệm là đúng hoặc để riêng nó nếu thử nghiệm là sai.

Bạn có thể viết này trong 1,4 bằng cách luồn các chức năng ẩn danh:

user> (-> 1 (#(if true (inc %) %)) 
      (#(if false (* % 42) %)) 
      (#(if (= 2 2) (* % 3) %))) 
6 

Mặc dù cond-> không giới thiệu chức năng mới, thay vào đó nó sẽ tạo ra một hình thức ràng buộc để có hiệu quả hơn:

user> (let [g 1 
      g (if true (inc g) g) 
      g (if false (* g 42) g) 
      g (if (= 2 2) (* g 3) g)] 
     g) 
6 

và sử dụng số gensym cho g trong một số biểu mẫu sử dụng ký hiệu g

---

cond->> rất giống nhau, nó chỉ đặt biểu tượng chuỗi ở một vị trí khác.

user> (let [g 1 
      g (if true (inc g) g) 
      g (if false (* 42 g) g) 
      g (if (= 2 2) (* 3 g) g)] 
     g) 
6 

mà trong ví dụ này sẽ cho kết quả tương tự vì * và + là giao hoán.