From 2dcce333d0556e483f4672b2dbfc92d352885aa8 Mon Sep 17 00:00:00 2001
From: Mikhalkovich Stanislav <miks@math.sfedu.ru>
Date: Fri, 15 May 2020 23:42:32 +0300
Subject: [PATCH] foreachWithTypeByIntRange.pas

---
 TestSuite/CompilationSamples/foreachWithTypeByIntRange.pas | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 TestSuite/CompilationSamples/foreachWithTypeByIntRange.pas

diff --git a/TestSuite/CompilationSamples/foreachWithTypeByIntRange.pas b/TestSuite/CompilationSamples/foreachWithTypeByIntRange.pas
new file mode 100644
index 000000000..41ed00cbc
--- /dev/null
+++ b/TestSuite/CompilationSamples/foreachWithTypeByIntRange.pas
@@ -0,0 +1,7 @@
+function f := new IntRange(0,3);
+function f1 := Lst(1,2,3);
+
+begin
+  foreach var i: integer in f do
+    Print(i)
+end.
\ No newline at end of file