felix@AI.SRI.COM (Francois Felix INGRAND) (11/24/88)
The following function have been posted a while ago (I do not remember who posted it, and I lost the header). But there is a strange feature in it, which I think may modify the result of the test X said: >I decided to time all the various methods that have been discussed. I >tried them on a Symbolics 3640 running Genera 7.2 and a Sun 3/280 >running Lucid CL 2.0.3. I used the default OPTIMIZE parameters. >Here is the function I used for the tests: >(defun sum-test (list &optional (count 100)) > (macrolet ((repeat (&body body) `(dotimes (i count) do (progn .,body))) .... ^^^^^^^^^ This do is a label and the progn is not needed. But perhaps the compiler take it out. .... end of the function have been erased -- -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Francois Felix INGRAND SRI International, AIC 333, Ravenswood Avenue felix@AI.SRI.COM MENLO PARK, CA 94025