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

fix #2616

Browse source
This commit is contained in:
Mikhalkovich Stanislav 2022-01-28 22:43:16 +03:00
parent aaac633fcd
commit 79126d18ea
6 changed files with 9 additions and 5 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 = "8";
public const string Build = "2";
public const string Revision = "3065";
public const string Revision = "3069";
public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

2
Configuration/Version.defs
View file

@ -1,4 +1,4 @@
%MINOR%=8
%REVISION%=3065
%REVISION%=3069
%COREVERSION%=2
%MAJOR%=3

2
Parsers/PascalABCParserNewSaushkin/ABCPascalYacc.cs
View file

@ -5871,7 +5871,7 @@ public partial class GPPGParser: ShiftReduceParser<PascalABCSavParser.Union, Lex
{
// sugared node
var l = ValueStack[ValueStack.Depth-2].ob as name_assign_expr_list;
var exprs = l.name_expr.Select(x=>x.expr).ToList();
var exprs = l.name_expr.Select(x=>x.expr.Clone() as expression).ToList();
var typename = "AnonymousType#"+Guid();
var type = new named_type_reference(typename,LocationStack[LocationStack.Depth-5]);

2
Release/pabcversion.txt
View file

@ -1 +1 @@
3.8.2.3065
3.8.2.3069

2
ReleaseGenerators/PascalABCNET_version.nsh
View file

@ -1 +1 @@
!define VERSION '3.8.2.3065'
!define VERSION '3.8.2.3069'

4
TestSuite/anonclass.pas Normal file
View file

@ -0,0 +1,4 @@
begin
var x := new class(r := 1..2, r2 := 3..4);
Assert(x.r = 1..2)
end.