Hi,

Am 27.04.2011 um 00:33 schrieb Zlatko Josic:

> Any idea why changes in the function below does'nt work (see first post on 
> this topic)?
> 
> 
> (defn process-request
>   [offer args]
>   (logger/log "process called")    
>   (let [offer-value (Double/parseDouble (:offer offer))
>           out-queue (:out-queue args)
>           unique-offers (:unique-offers args)
>           all-offers (:all-offers args)
>           streams (:streams offer)]  
>       (dosync  
>         (cond 
>           (empty? @unique-offers)
>           ((logger/log "map" @unique-offers) ; <— Add do here after first (
>             (alter unique-offers assoc offer-value streams))
>           :else (logger/log  "error")))))

Are you sure, that there is not exception thrown, which is eaten somehow? I 
suspect that the logger/log returns nil, which causes a NPE without updating 
the ref. Try adding a do after the first ( in the marked line above.

Sincerely
Meikel

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to