Qiu Xiafei <qiuxia...@gmail.com> writes:

> (defn num->digits
>   [num]
>   (loop [n num res []]
>     (if (zero? n)
>       res
>       (recur (long (/ n 10)) (cons (mod n 10) res)))))

How about  (quot n 10)  instead of (long (/ n 10))?  No sense in the
extra step.

David

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