From 82731ee05f365336e1b39280e995339d9822af17 Mon Sep 17 00:00:00 2001
From: Ivan Bondarev <ibond84@googlemail.com>
Date: Sun, 22 Jan 2023 12:22:08 +0100
Subject: [PATCH] #2794

---
 TestSuite/foreach11.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/TestSuite/foreach11.pas b/TestSuite/foreach11.pas
index 1cc5d8e55..5e5e420f5 100644
--- a/TestSuite/foreach11.pas
+++ b/TestSuite/foreach11.pas
@@ -4,5 +4,5 @@
     l.Add(s);
   assert(l[0] = 'a');
   assert(l[1] = 'b');
-  assert(l[1] = 'c');
+  assert(l[2] = 'c');
 end.
\ No newline at end of file