RosettaCodeData/Task/Rate-counter/Common-Lisp/rate-counter-3.lisp
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

1 line
54 B
Common Lisp

(print (time-this 99 (loop for i below 10000 sum i)))