aboutsummaryrefslogtreecommitdiffstats
path: root/tests/do-loop-nested.forth
diff options
context:
space:
mode:
Diffstat (limited to 'tests/do-loop-nested.forth')
-rw-r--r--tests/do-loop-nested.forth20
1 files changed, 20 insertions, 0 deletions
diff --git a/tests/do-loop-nested.forth b/tests/do-loop-nested.forth
new file mode 100644
index 0000000..00cf68a
--- /dev/null
+++ b/tests/do-loop-nested.forth
@@ -0,0 +1,20 @@
+INPUT
+: timestables 5 1 do i 5 1 do dup i * . loop loop drop ;
+timestables
+OUTPUT
+1
+2
+3
+4
+2
+4
+6
+8
+3
+6
+9
+12
+4
+8
+12
+16