diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/do-loop-nested.forth | 20 | ||||
| -rw-r--r-- | tests/do-loop.forth | 14 | 
2 files changed, 34 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 diff --git a/tests/do-loop.forth b/tests/do-loop.forth new file mode 100644 index 0000000..4bf49b2 --- /dev/null +++ b/tests/do-loop.forth @@ -0,0 +1,14 @@ +INPUT +: decade  10 0 do  i .  loop ; +decade +OUTPUT +0 +1 +2 +3 +4 +5 +6 +7 +8 +9  | 
