test36.bas « tests « bas « examples « apps - nuttx - Port of the Nuttx operating system (http://www.nuttx.org/) to the Kinetis K20 architecture.

summary refs log tree commit diff

path: root/apps/examples/bas/tests/test36.bas

blob: c7bd6f054fb59ab03b7bb8e3804ebf1bafe6b571 (plain) (blame)

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"