(defn testRun []
(var ret 0)
(var i 0)
(while (< i 10000000)
(+= ret i)
(++ i))
ret)
(print (testRun))
(defn testRun []
(var ret 0)
(var i 0)
(while (< i 10000000)
(+= ret i)
(++ i))
ret)
(print (testRun))