Loop on 'result' instead of the 'parts':

(defn my-func [& args]
  (map inc args))

(loop [args '(0 0 0)]
  (println args)
  (if (< (first args) 10)
    (recur (apply my-func args))))

(0 0 0)
(1 1 1)
(2 2 2)
(3 3 3)
(4 4 4)
(5 5 5)
(6 6 6)
(7 7 7)
(8 8 8)
(9 9 9)
(10 10 10)

Regards,
Tim.
--~--~---------~--~----~------------~-------~--~----~
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
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