diff options
| author | Rich Hickey <richhickey@gmail.com> | 2009-10-30 12:19:39 -0400 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2009-10-30 12:19:39 -0400 |
| commit | 1c8e76b1a0e6616c780902a317a7ab9a8423288b (patch) | |
| tree | 22b6d0ae65eb32a274c469a4f4c87cd89ce5743a /src/clj | |
| parent | eea980a7c21525f1281acf41e2bf6a2c7ae1a3dc (diff) | |
newnew is now reify
Diffstat (limited to 'src/clj')
| -rw-r--r-- | src/clj/clojure/core.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index 3c1b1fd9..46a7b233 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -4461,7 +4461,7 @@ not yet finished, calls to deref/@ will block." [#^Callable f] (let [fut (.submit clojure.lang.Agent/soloExecutor f)] - (new [clojure.lang.IDeref java.util.concurrent.Future] + (reify [clojure.lang.IDeref java.util.concurrent.Future] (deref [] (.get fut)) (get [] (.get fut)) (get [timeout unit] (.get fut timeout unit)) @@ -4564,7 +4564,7 @@ [] (let [d (java.util.concurrent.CountDownLatch. 1) v (atom nil)] - (new [clojure.lang.IFn clojure.lang.IDeref] this + (reify this [clojure.lang.IFn clojure.lang.IDeref] (deref [] (.await d) @v) (invoke [x] (locking d |