Hi Mike,
> Check link in archive:
> https://web.archive.org/web/20150308140349/http://kazimirmajorinc.com/Documents/The-speed-of-eval-in-some-Lisp-implementations/index.html
>
> Lets update PicoLisp (17.1.7) times and compare with other dialects.
> Demo code for time3 by @taij33n:
> (bench
> (let N 1000000
> (loop
> (eval
> '(prog (setq x 0) (setq x (+ x 1))) )
> (T (=0 (dec 'N)) 'done) ) ) )
OK, but is 'loop' necessary here? Why not simply
(bench
(do 1000000
(eval '(prog (zero X) (inc 'X))) ) )
This runs nearly at double speed on my system.
♪♫ Alex
--
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe
