Move kraken,scheme,python,cpp fib tests over to koka_bench, add WAVM as a tested compiler backend for the Kraken benchmarks
This commit is contained in:
8
koka_bench/scheme/scheme-fib-let.scm
Executable file
8
koka_bench/scheme/scheme-fib-let.scm
Executable file
@@ -0,0 +1,8 @@
|
||||
#!/usr/bin/env -S scheme --script
|
||||
(pretty-print ((letrec ((fib (lambda (n) (cond ((equal? n 0) 1)
|
||||
((equal? n 1) 1)
|
||||
(#t (let (
|
||||
(r1 (fib (- n 1)))
|
||||
(r2 (fib (- n 2)))
|
||||
) (+ r1 r2)))))))
|
||||
fib) (read (open-input-string (list-ref (command-line) 1)))))
|
||||
Reference in New Issue
Block a user