Mercurial > hg > indyvon

changeset 97:72821bd32e2e

find changesets by author, revision, files, or words in the commit message
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 diff
     1.1 --- a/src/net/kryshen/indyvon/core.clj	Thu Mar 03 03:29:08 2011 +0300
     1.2 +++ b/src/net/kryshen/indyvon/core.clj	Thu Mar 03 03:34:55 2011 +0300
     1.3 @@ -156,7 +156,7 @@
     1.4  (defn- cm-swap!
     1.5    "Atomically swaps the value associated with key in ConcurrentMap
     1.6     to be (apply f current-value args). Returns the new value."
     1.7 -  [cmap key f & args]
     1.8 +  [^ConcurrentMap cmap key f & args]
     1.9    (loop []
    1.10      (let [old (.get cmap key)
    1.11            new (apply f old args)]