ITupleNode signature change

This commit is contained in:
Michael Schimmel
2026-01-06 11:37:18 +01:00
parent 264314cd93
commit 40ed51aef8
23 changed files with 340 additions and 270 deletions
+7 -7
View File
@@ -343,7 +343,6 @@ var
startCount: Integer;
hasNested: Boolean;
paramIdentity: INamedIdentity;
paramsTuple: ITupleNode;
paramNode: IAstNode;
begin
L := Node.AsLambdaExpression;
@@ -359,12 +358,12 @@ begin
try
FCurrentBuilder.Define('<self>');
paramsTuple := L.Parameters;
SetLength(newParams, paramsTuple.Count);
var paramElements := L.Parameters.Elements;
SetLength(newParams, Length(paramElements));
for i := 0 to paramsTuple.Count - 1 do
for i := 0 to High(paramElements) do
begin
paramNode := paramsTuple.Items[i];
paramNode := paramElements[i];
if paramNode.Kind <> akIdentifier then
begin
@@ -454,14 +453,15 @@ begin
// 1. Keyword as Function Logic
if C.Callee.Kind = akKeyword then
begin
if C.Arguments.Count <> 1 then
var args := C.Arguments.Elements;
if Length(args) <> 1 then
begin
if Assigned(FLog) then
FLog.AddError(Format('Keyword access :%s requires exactly one argument.', [C.Callee.AsKeyword.Value.Name]), Node);
end
else
begin
var memberAccess := TAst.MemberAccess(Node.Identity, Accept(C.Arguments.Items[0]), C.Callee.AsKeyword);
var memberAccess := TAst.MemberAccess(Node.Identity, Accept(args[0]), C.Callee.AsKeyword);
Result := memberAccess;
exit;
end;