Clojure thành ngữ để đồng bộ giữa các chủ đề

Question

Kịch bản mà tôi cố gắng giải quyết là s sau, tôi có một chương trình thử nghiệm làm cho một trang web đến một điểm cuối web trên một hệ thống.

Chương trình thử nghiệm này có máy chủ web cầu nối đang chạy trên đó dự kiến ​​một cuộc gọi lại từ hệ thống bên ngoài hoàn thành chu kỳ kiểm tra thành công. Trong trường hợp không nhận được cuộc gọi lại trong một khoảng thời gian cụ thể (thời gian chờ), kiểm tra không thành công.

Để đạt được điều này, tôi muốn người chạy thử nghiệm chờ một "sự kiện" mà trình xử lý cầu nối sẽ đặt khi gọi lại.

Tôi đã nghĩ đến việc sử dụng CyclicBarrier của java nhưng tôi tự hỏi liệu có một cách thành ngữ trong clojure để giải quyết vấn đề này hay không.

Cảm ơn

Answer 1

Bạn có thể sử dụng promise bạn được hỏi về thời gian gần đây :) Một cái gì đó như thế này:

(def completion (promise)) 

; In test runner. 
; Wait 5 seconds then fail. 
(let [result (deref completion 5000 :fail)] 
    (if (= result :success) 
    (println "Great!") 
    (println "Failed :("))) 

; In jetty on callback 
(deliver completion :success) 

Answer 2

Trong Clojure thẳng, sử dụng một đại lý theo dõi callbacks nổi bật sẽ có ý nghĩa, mặc dù trong thực tế tôi sẽ khuyên bạn nên sử dụng Aleph, đây là thư viện cho lập trình web không đồng bộ giúp cho việc xử lý dễ dàng hơn. Nó tạo ra các trình xử lý vòng, có vẻ như nó sẽ phù hợp với mã hiện có của bạn.