aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/for_defer.elna
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2026-09-07 10:52:47 +0200
committerEugen Wissner <belka@caraus.de>2026-09-07 10:52:47 +0200
commit0fada11e99da430e9a056e46da9f0e110df6c45c (patch)
treef6ec9d1c32e176ffd236c4e556c0fe8d1cd4ea9c /testsuite/runnable/for_defer.elna
parent37f9bca3d0358192949f62573d163ce5362840c2 (diff)
downloadelna-0fada11e99da430e9a056e46da9f0e110df6c45c.tar.gz
Fix defer inside for loops
Diffstat (limited to 'testsuite/runnable/for_defer.elna')
-rw-r--r--testsuite/runnable/for_defer.elna11
1 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/runnable/for_defer.elna b/testsuite/runnable/for_defer.elna
new file mode 100644
index 0000000..6c9291b
--- /dev/null
+++ b/testsuite/runnable/for_defer.elna
@@ -0,0 +1,11 @@
+var
+ array: [2]Int := [0, 0]
+
+begin
+ for x of array do
+ defer
+ x^ := 1
+ end
+ end;
+ assert(array = [1, 1])
+end.