bug fix #1184

Configuration/GlobalAssemblyInfo.cs

@@ -15,7 +15,7 @@ internal static class RevisionClass
 	public const string Major = "3";
 	public const string Minor = "4";
 	public const string Build = "2";
-	public const string Revision = "1790";
+	public const string Revision = "1791";
 
         public const string MainVersion = Major + "." + Minor;
 	public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

Configuration/Version.defs

@@ -1,4 +1,4 @@
-%MINOR%=4
-%REVISION%=1790
 %COREVERSION%=2
+%REVISION%=1791
+%MINOR%=4
 %MAJOR%=3

ReleaseGenerators/PascalABCNET_version.nsh

@@ -1 +1 @@
-!define VERSION '3.4.2.1790'
+!define VERSION '3.4.2.1791'

TestSuite/errors/err0268.pas

@@ -0,0 +1,11 @@
+type
+  t1 = class end;
+  
+begin
+  
+  var ll := new LinkedList<t1>();
+  
+  foreach var o: LinkedListNode<t1> in ll do
+    writeln(o.GetType)
+  
+end.

TreeConverter/TreeConversion/SyntaxTreeVisitorNodes/Foreach.cs

@@ -112,7 +112,7 @@ namespace PascalABCCompiler.TreeConverter
                 context.close_var_definition_list(tn, null);
             }
 
-            if (!(foreachVariable.type is compiled_generic_instance_type_node) && !sys_coll_ienum)
+            if (/*!(foreachVariable.type is compiled_generic_instance_type_node) &&*/ !sys_coll_ienum) // SSM 16.09.18 - закомментировал это ограничение для фиксации бага #1184
                 convertion_data_and_alghoritms.check_convert_type_with_inheritance(elem_type, foreachVariable.type,
                     get_location(_foreach_stmt.identifier));
             return foreachVariable;