8 lines
205 B
QBasic
Raw Normal View History

on error goto 10
print "opening file"
2014-11-09 08:20:19 -06:00
open "/tmp/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"