Re: Baffled by NPE

[Meikel Brandmeyer]

Hi,

Am 03.11.2009 um 22:41 schrieb jan:

> (defn for-each [f items]
>  (when-not (empty? items)
>       (f (first items))
>       (recur f (rest items))))

And to not defeat the learning exercise...

(defn for-each
   [f items]
   (when-let [s (seq items)]
     (f (first s))
     (recur f (next s))))

Sincerely
Meikel

smime.p7s
Description: S/MIME cryptographic signature