diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-03-20 15:20:46 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-03-20 15:20:46 +0000 |
| commit | e9eba6d3453915158d4d302520fd2634c12842a5 (patch) | |
| tree | 2360024c919892c6cfa80725108a776c673b1d65 | |
| parent | d1f6bffa642555938c67a7f776018c50c899d3aa (diff) | |
changed use of ! to send in await, await-for
| -rw-r--r-- | src/boot.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot.clj b/src/boot.clj index ed86b3d0..996a5255 100644 --- a/src/boot.clj +++ b/src/boot.clj @@ -1223,7 +1223,7 @@ not-every? (comp not every?)) (let [latch (new java.util.concurrent.CountDownLatch (count agents)) count-down (fn [agent] (. latch (countDown)) agent)] (doseq agent agents - (! agent count-down)) + (send agent count-down)) (. latch (await)))) (defn await-for @@ -1235,7 +1235,7 @@ not-every? (comp not every?)) (let [latch (new java.util.concurrent.CountDownLatch (count agents)) count-down (fn [agent] (. latch (countDown)) agent)] (doseq agent agents - (! agent count-down)) + (send agent count-down)) (. latch (await timeout-ms (. java.util.concurrent.TimeUnit MILLISECONDS))))) (defmacro dotimes |