diff options
Diffstat (limited to 'testsuite/runnable/for_each_array.elna')
| -rw-r--r-- | testsuite/runnable/for_each_array.elna | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/testsuite/runnable/for_each_array.elna b/testsuite/runnable/for_each_array.elna new file mode 100644 index 0000000..bf5733d --- /dev/null +++ b/testsuite/runnable/for_each_array.elna @@ -0,0 +1,12 @@ +var + actual: [4]Word := [4]Word{} + input: [4]Word := [4]Word{ 2u, 4u, 6u, 8u } + i: Word := 1u + +begin + for element of input do + actual[i] := element^ * 2u; + i := i + 1u + end; + assert(actual = [4]Word{ 4u, 8u, 12u, 16u }) +end. |
