sbcl-lisp : 0.7s

racket-scheme : 0.7s

ccl-lisp : 6s

kawa-scheme : 14s

abcl-lisp : 45s

  • ventuspilot@alien.topB
    link
    fedilink
    English
    arrow-up
    1
    ·
    1 year ago

    At least with abcl you may want to consider using the builtin compiler for a considerable speedup, don’t know about the others:

    C:\>abcl
    CL-USER(1): (defun fib (x) (if (< x 2) 1 (+ (fib (- x 2)) (fib (- x 1)))))
    FIB
    CL-USER(2): (time (fib 39))
    86.97 seconds real time
    0 cons cells
    102334155
    CL-USER(3): (compile 'fib)
    FIB
    NIL
    NIL
    CL-USER(4): (time (fib 39))
    8.958 seconds real time
    0 cons cells
    102334155
    CL-USER(5):