Hi,

you could use a macro, but a simple function should suffice. I use 
something along the lines of

(defn cond-transform [x & pairs]
  (reduce (fn [x [test-fn transform-fn]]
            (if (test-fn x)
              (transform-fn x)
              x))
          x
          pairs))
 
;; example
 
(cond-transform x
  [test1 transform1]
  [test2 transform2]
  [test3 transform3])


in my project. test1,transform1,etc are functions with one argument (the 
current x). transform will only be called when test returns true.

HTH,
/thomas


On Friday, July 5, 2013 2:13:05 PM UTC+2, Laurent PETIT wrote:
>
> hello, 
>
> More often than not, I'm facing code looking like this: 
>
> (let [x (if (test1 x) (transform1 x) x) 
>        x (if (test2 x) (transform2 x) x) 
>        x (if (test3 x) (transform3 x) x)] 
>   x) 
>
> Do you know of a better way to write this with only clojure.core 
> functions? 
>
> So far, I've had no success with cond->, as->, etc. 
>

-- 
-- 
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
--- 
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.


Reply via email to