test06.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/test06.bas

blob: ddd6efe78b5545be71ff066d397ddf117af08c79 (plain) (blame)

10 def fnloop
20   if n=0.0 then
30     r=0.0
40   else
50     print n
60     n=n-1.0
70     r=fnloop()
80   end if
90 =r
100 n=10
110 print fnloop