test37.bas « tests « bastest « 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/bastest/tests/test37.bas

blob: 80f65a7dea3138cceadeda52752a882722ca19ea (plain) (blame)

10 open "i",1,"test.ref"
20 while not eof(1)
30 line input #1,a$
40 if a$="abc" then print a$; else print "def"
50 wend