Re: Loop performance issue with variable

2011-11-01 Thread Sean Corfield
On Tue, Nov 1, 2011 at 4:29 AM, redraiment wrote: > user=> (def n 1) > #'user/n > user=> (time (loop [cnt 1 sum 0] (if (zero? cnt) sum (recur > (dec cnt) (+ sum cnt) > "Elapsed time: 605.564858 msecs" > 50005000 > user=> (time (loop [cnt n sum 0] (if (zero? cnt) sum (re

Re: Loop performance issue with variable

2011-11-01 Thread David Nolen
n is stored in a var and thus boxed. You can cast it to primitive long with (long n). On Tuesday, November 1, 2011, redraiment wrote: > Hi all, > > My environment is, Kubuntu 11.10, Clojure v1.3 and sun-java6-jdk. I > issued the following forms in REPL: > > user=> (def n 1) > #'user/n > u

Loop performance issue with variable

2011-11-01 Thread redraiment
Hi all, My environment is, Kubuntu 11.10, Clojure v1.3 and sun-java6-jdk. I issued the following forms in REPL: user=> (def n 1) #'user/n user=> (time (loop [cnt 1 sum 0] (if (zero? cnt) sum (recur (dec cnt) (+ sum cnt) "Elapsed time: 605.564858 msecs" 50005000 user=>