diff options
Diffstat (limited to 'apps/examples/bastest/tests/test36.bas')
-rw-r--r-- | apps/examples/bastest/tests/test36.bas | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/apps/examples/bastest/tests/test36.bas b/apps/examples/bastest/tests/test36.bas new file mode 100644 index 000000000..c7bd6f054 --- /dev/null +++ b/apps/examples/bastest/tests/test36.bas @@ -0,0 +1,8 @@ +on error goto 10 +print "opening file" +open "test.out" for output lock write as #1 +print "open succeeded" +if command$<>"enough" then shell "sh ./test/runbas test.bas enough" +end +10 print "open failed" + |