RosettaCodeData/Task/Rate-counter/Common-Lisp/rate-counter-3.lisp
2023-07-01 13:44:08 -04:00

1 line
54 B
Common Lisp

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