From ffe6097c534c82b9402bb6f0a57abeebd075e61d Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Wed, 8 Jul 2026 11:04:34 +0200
Subject: Allow multiple fields with the same type

---
 testsuite/runnable/two_fields_same_type.elna | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 testsuite/runnable/two_fields_same_type.elna

(limited to 'testsuite/runnable')

diff --git a/testsuite/runnable/two_fields_same_type.elna b/testsuite/runnable/two_fields_same_type.elna
new file mode 100644
index 0000000..b881dda
--- /dev/null
+++ b/testsuite/runnable/two_fields_same_type.elna
@@ -0,0 +1,16 @@
+type
+  R = record
+    x, y: Int
+  end
+
+proc f(): Int
+var
+  r: R := R(3, 2)
+
+  return r.x + r.y
+end
+
+begin
+  assert(f() = 5);
+  return 0
+end.
-- 
cgit v1.2.3