At Thu, 06 Oct 2005 14:50:18 +0900, Daishi Kato wrote: > I also tried to compare with fx+. How would you explain this?
Oops, my fault... It was reasonable. % csi -eval '(define m (expt 2 17))(print (cpu-time))(let loop ([i 0]) (or (> i m) (loop (+ i 1))))(print (cpu-time))' 2 64 % csi -eval '(use numbers)(define m (expt 2 17))(print (cpu-time))(let loop ([i 0]) (or (> i m) (loop (+ i 1))))(print (cpu-time))' 4 86 % csi -eval '(use numbers)(define m (expt 2 17))(print (cpu-time))(let loop ([i 0]) (or (> i m) (loop (fx+ i 1))))(print (cpu-time))' 2 67 Now, let me check (expt). Daishi _______________________________________________ Chicken-users mailing list [email protected] http://lists.nongnu.org/mailman/listinfo/chicken-users
