Re: stats say SBCL is 78 875 % faster than natively compiled Elisp

[Emanuel Berg]

Chen Zhaoyang wrote:

>> (defun fib (reps num)
>>   (let ((z 0))
>>     (dotimes (_ reps)
>>       (let ((p1 1)
>>             (p2 1))
>>         (dotimes (_ (- num 2))
>>           (setf z (+ p1 p2)
>>                 p2 p1
>>                 p1 z))))
>>     z))
>
> Maybe try out (named-let)? It should be fun to rewrite it
> with tail calls.

Do it in SBCL as well.

-- 
underground experts united
https://dataswamp.org/~incal