Refactoring Keyword mapping, introducing tuples

This commit is contained in:
Michael Schimmel
2026-01-04 15:21:46 +01:00
parent 0a7a6ea2d0
commit 700088b5c5
3 changed files with 20 additions and 27 deletions
+1 -1
View File
@@ -385,7 +385,7 @@ begin
SetLength(fields, N.Fields.Count);
for i := 0 to N.Fields.Count - 1 do
fields[i] := TPair<IKeyword, TDataValue>.Create(N.Fields[i].Key.Value, Visit(N.Fields[i].Value));
Result := TDataValue.FromGenericRecord(TKeywordMapping<TDataValue>.Create(fields));
Result := TDataValue.FromGenericRecord(TGenericRecord<TDataValue>.Create(fields));
end;
end;
+1 -1
View File
@@ -482,7 +482,7 @@ begin
end;
end;
Result := TDataValue.FromGenericRecord(TKeywordMapping<TDataValue>.Create(recFields.ToArray));
Result := TDataValue.FromGenericRecord(TGenericRecord<TDataValue>.Create(recFields.ToArray));
finally
recFields.Free;
end;