diff options
Diffstat (limited to 'apps/examples/bas/tests/test07.bas')
-rw-r--r-- | apps/examples/bas/tests/test07.bas | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/apps/examples/bas/tests/test07.bas b/apps/examples/bas/tests/test07.bas index 57f2899a6..12c0cbdc7 100644 --- a/apps/examples/bas/tests/test07.bas +++ b/apps/examples/bas/tests/test07.bas @@ -1,25 +1,5 @@ -#!/bin/sh - -echo -n $0: 'Recursive function with arguments... ' - -cat >test.bas <<eof 10 def fna(x) 20 if x=0 then r=1 else r=x*fna(x-1) 30 =r 40 print fna(7) -eof - -cat >test.ref <<eof - 5040 -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 |