fix #2168

Configuration/GlobalAssemblyInfo.cs

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

Configuration/Version.defs

@@ -1,4 +1,4 @@
-%COREVERSION%=2
-%REVISION%=2378
 %MINOR%=6
+%REVISION%=2379
+%COREVERSION%=2
 %MAJOR%=3

Release/pabcversion.txt

@@ -1 +1 @@
-3.6.2.2378
+3.6.2.2379

ReleaseGenerators/PascalABCNET_version.nsh

@@ -1 +1 @@
-!define VERSION '3.6.2.2378'
+!define VERSION '3.6.2.2379'

TestSuite/CompilationSamples/PABCSystem.pas

@@ -770,7 +770,7 @@ procedure Read(var x: BigInteger);
 procedure Readln;
 
 ///- function TryRead(var x: число): boolean;
-/// Вводит числовое значение x клавиатуры. Возвращает False если при вводе произошла ошибка
+/// Вводит числовое значение x с клавиатуры. Возвращает False если при вводе произошла ошибка
 function TryRead(var x: integer): boolean;
 ///--
 function TryRead(var x: real): boolean;
@@ -793,7 +793,7 @@ function TryRead(var x: single): boolean;
 ///--
 function TryRead(var x: BigInteger): boolean;
 
-/// Вводит логическое значение x клавиатуры. Возвращает False если при вводе произошла ошибка
+/// Вводит логическое значение x с клавиатуры. Возвращает False если при вводе произошла ошибка
 function TryRead(var x: boolean): boolean;
 
 /// Возвращает значение типа integer, введенное с клавиатуры

TestSuite/IntPtrAsLambdaParam.pas

@@ -0,0 +1,4 @@
+begin
+  var cb: System.Action<System.IntPtr>;
+  cb := i->exit();
+end.

TreeConverter/TreeRealization/types.cs

@@ -382,7 +382,7 @@ namespace PascalABCCompiler.TreeRealization
         {
             get
             {
-                return name;
+                return full_name;
             }
         }