aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/for_with.elna
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2026-09-07 22:02:15 +0200
committerEugen Wissner <belka@caraus.de>2026-09-07 23:39:53 +0200
commit72f5e82196d95008ed12c12de6bdccf24361e106 (patch)
tree8319324de8e2a5182dc3c1ddca00a837c2489ad2 /testsuite/runnable/for_with.elna
parent47521ad6d85f9bd6caee39696ce40dff82cfa50d (diff)
downloadelna-72f5e82196d95008ed12c12de6bdccf24361e106.tar.gz
Make module entry point more procedure like
Diffstat (limited to 'testsuite/runnable/for_with.elna')
-rw-r--r--testsuite/runnable/for_with.elna5
1 files changed, 3 insertions, 2 deletions
diff --git a/testsuite/runnable/for_with.elna b/testsuite/runnable/for_with.elna
index 582a641..0859ed0 100644
--- a/testsuite/runnable/for_with.elna
+++ b/testsuite/runnable/for_with.elna
@@ -1,10 +1,11 @@
+program()
var
actual: [3]Word := [0u, 0u, 0u]
-
-program()
begin
for element of [1u, 2u, 3u] with i do
actual[i] := i * element^
end;
assert(actual = [1u, 4u, 9u])
+return 0u8
+
end.