(defn test-run []
(var ret 0)
(loop [i :range [0 10000000]
:when (or (= 0 (% i 3))
(= 0 (% i 5)))]
(+= ret i))
ret)
(print "The sum is: " (test-run))
(defn test-run []
(var ret 0)
(loop [i :range [0 10000000]
:when (or (= 0 (% i 3))
(= 0 (% i 5)))]
(+= ret i))
ret)
(print "The sum is: " (test-run))