diff options
Diffstat (limited to 'testsuite/runnable/repeat_loop.elna')
| -rw-r--r-- | testsuite/runnable/repeat_loop.elna | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/runnable/repeat_loop.elna b/testsuite/runnable/repeat_loop.elna new file mode 100644 index 0000000..5faaeab --- /dev/null +++ b/testsuite/runnable/repeat_loop.elna @@ -0,0 +1,11 @@ +var + actual: [4]Word := [4]Word{} + i: Word := 0u + +begin + repeat + i := i + 1u; + actual[i] := i + until i = 4u; + assert(actual = [4]Word{ 1u, 2u, 3u, 4u }) +end. |