diff options
Diffstat (limited to 'apps/interpreters/bas/test/test31')
-rw-r--r-- | apps/interpreters/bas/test/test31 | 43 |
1 files changed, 0 insertions, 43 deletions
diff --git a/apps/interpreters/bas/test/test31 b/apps/interpreters/bas/test/test31 deleted file mode 100644 index 7c4b79017..000000000 --- a/apps/interpreters/bas/test/test31 +++ /dev/null @@ -1,43 +0,0 @@ -#!/bin/sh - -echo -n $0: 'PRINT default format... ' - -cat >test.bas <<'eof' -10 for i=-8 to 8 -20 x=1+1/3 : y=1 : j=i -30 for j=i to -1 : x=x/10 : y=y/10 : next -40 for j=i to 1 step -1 : x=x*10 : y=y*10 : next -50 print x,y -60 next -eof - -cat >test.ref <<'eof' - 1.333333e-08 1e-08 - 1.333333e-07 1e-07 - 1.333333e-06 1e-06 - 1.333333e-05 1e-05 - 0.000133 0.0001 - 0.001333 0.001 - 0.013333 0.01 - 0.133333 0.1 - 1.333333 1 - 13.33333 10 - 133.3333 100 - 1333.333 1000 - 13333.33 10000 - 133333.3 100000 - 1333333 1000000 - 1.333333e+07 1e+07 - 1.333333e+08 1e+08 -eof - -sh ./test/runbas test.bas >test.data - -if cmp test.ref test.data -then - rm -f test.* - echo passed -else - echo failed - exit 1 -fi |