diff options
author | Rich Hickey <richhickey@gmail.com> | 2010-08-11 22:18:33 -0400 |
---|---|---|
committer | Stuart Halloway <stu@thinkrelevance.com> | 2010-08-12 09:14:53 -0400 |
commit | 8aaca5458cdbbad267217dfc8bd6f0aeca435b95 (patch) | |
tree | 0f938169b257d767326a9f9b48fb8e399dac91da | |
parent | 0f47e7c575390ddf0df895c26c29f97c8a4c1618 (diff) |
make sure future clears closed-overs, fixes #423
Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>
-rw-r--r-- | src/clj/clojure/core.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index ade4405c..5115954e 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -5410,7 +5410,7 @@ return it on all subsequent calls to deref/@. If the computation has not yet finished, calls to deref/@ will block." {:added "1.1"} - [& body] `(future-call (fn [] ~@body))) + [& body] `(future-call (^{:once true} fn* [] ~@body))) (defn future-cancel |