Merge branch 'master' of https://github.com/pascalabcnet/pascalabcnet

Configuration/GlobalAssemblyInfo.cs

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

Configuration/Version.defs

@@ -1,4 +1,4 @@
-%MINOR%=0
-%REVISION%=1094
 %COREVERSION%=0
+%REVISION%=1107
+%MINOR%=0
 %MAJOR%=3

ReleaseGenerators/PascalABCNET_version.nsh

@@ -1 +1 @@
-!define VERSION '3.0.0.1094'
+!define VERSION '3.0.0.1107'

TestSuite/CompilationSamples/PT4.pas

@@ -1460,7 +1460,7 @@ begin
   result := Range(1, n).Select(e -> GetString()).ToArray();
 end;   
 
-function  ReadMatrInteger(m,n: integer): array [,] of integer;
+function ReadMatrInteger(m,n: integer): array [,] of integer;
 begin
   result := new integer[m,n];
   for var i := 0 to m-1 do
@@ -1468,7 +1468,7 @@ begin
       result[i,j] := ReadInteger;
 end;
 
-function  ReadMatrInteger(): array [,] of integer;
+function ReadMatrInteger(): array [,] of integer;
 begin
   result := ReadMatrInteger(ReadInteger,ReadInteger);
 end;

bin/Lib/PABCSystem.axml

@@ -1371,7 +1371,7 @@
         </Items>
       </PointOfInterest>
       <PointOfInterest>
-        <Name>eeeeeeeee</Name>
+        <Name>write(f: Text</Name>
         <FileName>\PABCSystem.pas</FileName>
         <Text>f.sw.Write(</Text>
         <OuterContext>

bin/Lib/PT4.pas

@@ -1460,7 +1460,7 @@ begin
   result := Range(1, n).Select(e -> GetString()).ToArray();
 end;   
 
-function  ReadMatrInteger(m,n: integer): array [,] of integer;
+function ReadMatrInteger(m,n: integer): array [,] of integer;
 begin
   result := new integer[m,n];
   for var i := 0 to m-1 do
@@ -1468,7 +1468,7 @@ begin
       result[i,j] := ReadInteger;
 end;
 
-function  ReadMatrInteger(): array [,] of integer;
+function ReadMatrInteger(): array [,] of integer;
 begin
   result := ReadMatrInteger(ReadInteger,ReadInteger);
 end;