diff options
Diffstat (limited to 'apps/interpreters/bas/test/test24')
-rw-r--r-- | apps/interpreters/bas/test/test24 | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/apps/interpreters/bas/test/test24 b/apps/interpreters/bas/test/test24 deleted file mode 100644 index 40037cdcd..000000000 --- a/apps/interpreters/bas/test/test24 +++ /dev/null @@ -1,36 +0,0 @@ -#!/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 -40 mat a=b*c -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 |