summaryrefslogtreecommitdiff
path: root/apps/interpreters/bas/test/test12
diff options
context:
space:
mode:
Diffstat (limited to 'apps/interpreters/bas/test/test12')
-rw-r--r--apps/interpreters/bas/test/test1232
1 files changed, 0 insertions, 32 deletions
diff --git a/apps/interpreters/bas/test/test12 b/apps/interpreters/bas/test/test12
deleted file mode 100644
index b78f53747..000000000
--- a/apps/interpreters/bas/test/test12
+++ /dev/null
@@ -1,32 +0,0 @@
-#!/bin/sh
-
-echo -n $0: 'Exception handling... '
-
-cat >test.bas <<'eof'
-10 on error print "global handler 1 caught error in line ";erl : resume 30
-20 print mid$("",-1)
-30 on error print "global handler 2 caught error in line ";erl : end
-40 def procx
-50 on error print "local handler caught error in line";erl : goto 70
-60 print 1/0
-70 end proc
-80 procx
-90 print 1 mod 0
-eof
-
-cat >test.ref <<eof
-global handler 1 caught error in line 20
-local handler caught error in line 60
-global handler 2 caught error in line 90
-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