summaryrefslogtreecommitdiff
path: root/Test
diff options
context:
space:
mode:
Diffstat (limited to 'Test')
-rw-r--r--Test/fact.b4
-rw-r--r--Test/raise.b6
-rwxr-xr-xTest/timetest4
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