I write a test to produce it,just run the fact several times quickly, and
we can see that (println "3" v (java.util.Date.) only be executed one time.
(defn handler [c]
(go
(let []
(loop []
(when-let [v (<! c)]
(println "2" (java.util.Date.))
(Thread/sleep 4000)
(println "3" v (java.util.Date.))
(recur))
(println "existing...")))))
(def c (chan))
(handler c)
(fact "test timeout"
(let []
(println "1" (java.util.Date.))
(go (>! c "hello"))
(alts!! [c (timeout 3000)])
(println "4" (java.util.Date.))
""
=> nil?))
--
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
---
You received this message because you are subscribed to the Google Groups
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
