diff --git a/benchmark/recfib/fib.nuj b/benchmark/recfib/fib.nuj index cc817c80..9f85c148 100644 --- a/benchmark/recfib/fib.nuj +++ b/benchmark/recfib/fib.nuj @@ -5,4 +5,4 @@ ((= 1 n) 1) (#t (+ (fib (- n 1)) (fib (- n 2)))))) -(pfmtln "fib(40) is: {}\nGC Runs: {}" (fib 40) (garbage-collection-runs)) +(pfmtln "fib(30) is: {}\nGC Runs: {}" (fib 30) (garbage-collection-runs)) diff --git a/benchmark/recfib/fib.scm b/benchmark/recfib/fib.scm index bab3003c..e47f40d4 100644 --- a/benchmark/recfib/fib.scm +++ b/benchmark/recfib/fib.scm @@ -3,6 +3,6 @@ ((= 1 n) 1) (#t (+ (fib (- n 1)) (fib (- n 2)))))) -(display "fib(40) = ") -(display (fib 40)) +(display "fib(30) = ") +(display (fib 30)) (display "\n") diff --git a/nujel-benchmark.tmp b/nujel-benchmark.tmp new file mode 100644 index 00000000..51587dac --- /dev/null +++ b/nujel-benchmark.tmp @@ -0,0 +1,2 @@ +Command terminated by signal 2 +#@(:user 6.22 :system 0.00 :elapsed "0:06.32" :cpu "98%" :text 0 :data 0 :max-resident 19380 :inputs 0 :outputs 0 :pagefaults-major 0 :pagefaults-minor 3909 :swaps 0) diff --git a/tools/benchmark.nuj b/tools/benchmark.nuj index a2b34776..6f5d916b 100755 --- a/tools/benchmark.nuj +++ b/tools/benchmark.nuj @@ -108,7 +108,7 @@ ("crc32" "0936343A") ("compile-stdlib" "Image built") ("adler32" "E50BA232") - ("recfib" "102334155") + ("recfib" "832040") (otherwise "チーズスイートホーム"))) (def time-template "#@(:user %U :system %S :elapsed \\\"%E\\\" :cpu \\\"%P\\\" :text %X :data %D :max-resident %M :inputs %I :outputs %O :pagefaults-major %F :pagefaults-minor %R :swaps %W)")