e0dcfa0c55
* Remove multiple newlines at the end of file * Remove the white space from the end of line
8 lines
205 B
QBasic
8 lines
205 B
QBasic
on error goto 10
|
|
print "opening file"
|
|
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"
|