bug fix #379

Configuration/GlobalAssemblyInfo.cs

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

Configuration/Version.defs

@@ -1,4 +1,4 @@
 %COREVERSION%=0
-%REVISION%=1429
+%REVISION%=1431
 %MINOR%=2
 %MAJOR%=3

ReleaseGenerators/PascalABCNET_version.nsh

@@ -1 +1 @@
-!define VERSION '3.2.0.1429'
+!define VERSION '3.2.0.1431'

SyntaxTreeConverters/StandardSyntaxConverter.cs

@@ -42,7 +42,7 @@ namespace PascalABCCompiler.SyntaxTreeConverters
 /*#if DEBUG
             try
             {
-                //root.visit(new SimplePrettyPrinterVisitor(@"d:\\zzz3.txt"));
+                //root.visit(new SimplePrettyPrinterVisitor(@"d:\\zzz4.txt"));
             }
             catch
             {

TestSuite/CompilationSamples/yield_foreach_x.pas

@@ -0,0 +1,12 @@
+function GetWords(sq:sequence of string):sequence of string;
+begin
+  foreach var x in sq do
+  begin
+    var a := x.toWords; //â ýòîé ñòðîêå îøèáêà, åñëè ðàñêîììåíòèðîâàòü yield
+    yield a[0];
+  end;
+end;
+begin
+  var sq := Seq('1 2 3', 'a b c d');
+  GetWords(sq).Print;
+end.

TestSuite/CompilationSamples/yield_q_Deque.pas

@@ -0,0 +1,10 @@
+function SeqGen: sequence of integer;
+begin
+  var q := new Queue<integer>;
+  var d := q.Dequeue;
+  yield 1;
+end;
+
+
+begin
+end.

TreeConverter/TreeConversion/syntax_tree_visitor.cs

@@ -15930,6 +15930,7 @@ namespace PascalABCCompiler.TreeConverter
                 // SSM 26.06.16 - правка в связи с автовыведением типов в yieldах
                 if (to.type is auto_type)
                 {
+                    try_convert_typed_expression_to_function_call(ref from);
                     if (to is class_field_reference)
                     {
                         var cfr = to as class_field_reference;