summaryrefslogtreecommitdiff
path: root/apps/examples/bastest/tests/test18.bas
diff options
context:
space:
mode:
Diffstat (limited to 'apps/examples/bastest/tests/test18.bas')
-rw-r--r--apps/examples/bastest/tests/test18.bas13
1 files changed, 13 insertions, 0 deletions
diff --git a/apps/examples/bastest/tests/test18.bas b/apps/examples/bastest/tests/test18.bas
new file mode 100644
index 000000000..73ab93e1b
--- /dev/null
+++ b/apps/examples/bastest/tests/test18.bas
@@ -0,0 +1,13 @@
+print "loop started"
+x$=""
+do while len(x$)<3
+ print "x$ is ";x$
+ x$=x$+"a"
+ y$=""
+ do while len(y$)<2
+ print "y$ is ";y$
+ y$=y$+"b"
+ loop
+loop
+print "loop ended"
+