Mercurial > hg > indyvon
changeset 97:72821bd32e2e
Avoid reflection.
| author | Mikhail Kryshen <mikhail@kryshen.net> |
|---|---|
| date | Thu, 03 Mar 2011 03:34:55 +0300 |
| parents | fbedad9bd6de |
| children | ff6e542671eb |
| files | src/net/kryshen/indyvon/core.clj |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/net/kryshen/indyvon/core.clj Thu Mar 03 03:29:08 2011 +0300 +++ b/src/net/kryshen/indyvon/core.clj Thu Mar 03 03:34:55 2011 +0300 @@ -156,7 +156,7 @@ (defn- cm-swap! "Atomically swaps the value associated with key in ConcurrentMap to be (apply f current-value args). Returns the new value." - [cmap key f & args] + [^ConcurrentMap cmap key f & args] (loop [] (let [old (.get cmap key) new (apply f old args)]