Allow multiple fields with the same type

1 files changed, 16 insertions, 0 deletions

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.