diff options
Diffstat (limited to 'Test')
-rw-r--r-- | Test/fact.b | 4 | ||||
-rw-r--r-- | Test/raise.b | 6 | ||||
-rwxr-xr-x | Test/timetest | 4 |
3 files changed, 6 insertions, 8 deletions
diff --git a/Test/fact.b b/Test/fact.b index 995a26d..1bf850a 100644 --- a/Test/fact.b +++ b/Test/fact.b @@ -5,8 +5,6 @@ define f (x) { } for (a=1; a<600; a++) b=f(a) -" -" -"b=";b +"length(b)= "; length(b) quit diff --git a/Test/raise.b b/Test/raise.b index ec6929d..a4314a0 100644 --- a/Test/raise.b +++ b/Test/raise.b @@ -1,7 +1,7 @@ for (i=0; i<1000; i++) a = 2^i; -a +length(a) for (i=3000; i<3100; i++) a = 3^i; -a +length(a) for (i=200; i<220; i++) a = (4^100)^i; -a +length(a) quit diff --git a/Test/timetest b/Test/timetest index 1a4d0ea..36d8d8e 100755 --- a/Test/timetest +++ b/Test/timetest @@ -6,9 +6,9 @@ SYSBC=/usr/bin/bc if [ x$BC = x ] ; then BC=../bc/bc fi -for file in exp.b ln.b sine.b atan.b jn.b mul.b div.b raise.b sqrt.b +for file in exp.b ln.b sine.b atan.b jn.b mul.b div.b raise.b sqrt.b fact.b do -for prog in $BC $SYSBC $OTHERBC +for prog in $SYSBC $BC $OTHERBC do echo Timing $file with $prog time $prog -l $file |