administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

3.9.0.3386

Browse source
This commit is contained in:
Mikhalkovich Stanislav 2023-12-01 14:11:36 +03:00
parent 4ff07ae45f
commit 2614677a69
5 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Configuration/GlobalAssemblyInfo.cs
View file

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

4
Configuration/Version.defs
View file

@ -1,4 +1,4 @@
%MINOR%=9
%REVISION%=3385
%COREVERSION%=0
%REVISION%=3386
%MINOR%=9
%MAJOR%=3

2
Release/pabcversion.txt
View file

@ -1 +1 @@
3.9.0.3385
3.9.0.3386

2
ReleaseGenerators/PascalABCNET_version.nsh
View file

@ -1 +1 @@
!define VERSION '3.9.0.3385'
!define VERSION '3.9.0.3386'

4
TestSuite/CompilationSamples/PABCSystem.pas
View file

@ -685,7 +685,7 @@ type
// https://referencesource.microsoft.com/#System.Core/System/Linq/Enumerable.cs,783a052330e7d48d,references
public procedure CopyTo(a: array of integer; arrayIndex: integer) :=
for var i := 0 to System.Math.Min(self.Count, a.Length-arrayIndex) do
for var i := 0 to System.Math.Min(self.Count, a.Length-arrayIndex)-1 do
a[i+arrayIndex] := l+i;
end;
@ -751,7 +751,7 @@ type
end;
public procedure CopyTo(a: array of char; arrayIndex: integer) :=
for var i := 0 to System.Math.Min(self.Count, a.Length-arrayIndex) do
for var i := 0 to System.Math.Min(self.Count, a.Length-arrayIndex)-1 do
a[i+arrayIndex] := char(integer(l)+i);
end;