diff options
Diffstat (limited to 'apps/examples/bas/tests/test24.bas')
-rw-r--r-- | apps/examples/bas/tests/test24.bas | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/apps/examples/bas/tests/test24.bas b/apps/examples/bas/tests/test24.bas index 40037cdcd..95678830b 100644 --- a/apps/examples/bas/tests/test24.bas +++ b/apps/examples/bas/tests/test24.bas @@ -1,8 +1,3 @@ -#!/bin/sh - -echo -n $0: 'Matrix multiplication... ' - -cat >test.bas <<'eof' 10 dim b(2,3),c(3,2) 20 for i=1 to 2 : for j=1 to 3 : read b(i,j) : next : next 30 for i=1 to 3 : for j=1 to 2 : read c(i,j) : next : next @@ -10,27 +5,4 @@ cat >test.bas <<'eof' 50 mat print b,c,a 60 data 1,2,3,3,2,1 70 data 1,2,2,1,3,3 -eof - -cat >test.ref <<'eof' - 1 2 3 - 3 2 1 - - 1 2 - 2 1 - 3 3 - - 14 13 - 10 11 -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 |