twc/ludus
4
0
Fork 0
Code Issues 32 Pull Requests Packages Projects 8 Releases Wiki Activity

Some light speed testing: Ludus is 1000x slower than Clojure.

Browse Source
This commit is contained in:
Scott Richmond 2022-03-20 20:15:43 -04:00
parent 52f357765d
commit 41e9b4d9dd
1 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/ludus/interpreter.clj
View File

@ -253,7 +253,7 @@
(n) -> mult (n, fact (sub (n, 1))) (n) -> mult (n, fact (sub (n, 1)))
} }
fact (6) fib (1)
") ")
@ -278,6 +278,16 @@
") ")
(defn fib [n]
(case n
0 1
1 1
(+ (fib (- n 1)) (fib (- n 2)))))
(fib 35)