Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-26 21:58:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Change benchmark program from fib(20) to fib(30)

Browse source
This commit is contained in:
Koichi Nakamura 2021-01-11 18:29:15 +09:00
parent c7fd547560
commit c0eb611568
2 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
benchmark/fib.fs
View file

@ -1,2 +1,2 @@
: fib dup 2 < unless 1- dup recurse swap 1- recurse + then ; : fib dup 2 < unless 1- dup recurse swap 1- recurse + then ;
20 fib . cr 30 fib . cr

8
benchmark/gendoc.sh
View file

@ -16,8 +16,8 @@ function generate-table {
echo "# $1" echo "# $1"
echo "\`$2\`" echo "\`$2\`"
echo echo
echo "Average of $3 execution times." #echo "Average of $3 execution times."
echo #echo
echo "| implementation | sec |" echo "| implementation | sec |"
echo "|:---------------|----:|" echo "|:---------------|----:|"
for impl in $TARGETS; do for impl in $TARGETS; do
@ -28,5 +28,5 @@ function generate-table {
echo echo
} }
generate-table "Bootstrap Time" "./planck < bootstrap.fs benchmark/nop.fs" 3 generate-table "Bootstrap Time" "./planck < bootstrap.fs benchmark/nop.fs" 1
generate-table "Fib(20)" "./planck < bootstrap.fs benchmark/fib.fs" 3 generate-table "Fib(30)" "./planck < bootstrap.fs benchmark/fib.fs" 1