On May 31, 2009, at 11:38 AM, Emeka wrote:

>   Hello All
>
>
> (defn chang[f  key hj]
> (dosync (ref-set f (assoc @f key hj))))
>
>
>
> (defn proceed-now-right  [alon key]
>     (let [val (extract-num alon key)
>          row-dev (eval (get-next-row inc (first val)))
>          keyword-dev-right (get-key inc  (second val))
>          cell-empty-right (check-cell-empty? keyword-dev-right   row- 
> dev)]
>          (if cell-empty-right
>          (do (chang row-dev keyword-dev-right (@alon key)) (chang  
> alon key \space))
>          (println "can't do this"))))
>
>
> I found that each time I try form proceed-now-right I get error when  
> IF is true. Why is it so? The function chang works on it own...


What parameters are you calling proceed-now-right with?

—
Daniel Lyons
http://www.storytotell.org -- Tell It!


--~--~---------~--~----~------------~-------~--~----~
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