AST list refactoring
This commit is contained in:
@@ -326,7 +326,7 @@ begin
|
||||
OwnerNode.Orientation := loVertical;
|
||||
OwnerNode.Alignment := laFlush;
|
||||
|
||||
// Delegate to RecordFieldList
|
||||
// Delegate to Fields Tuple (previously RecordFieldList)
|
||||
FFieldsNode := visu.CallAccept(FNode.Fields);
|
||||
end;
|
||||
|
||||
@@ -335,7 +335,7 @@ begin
|
||||
Result :=
|
||||
TAst.RecordLiteral(
|
||||
FNode.Identity,
|
||||
FFieldsNode.CreateAst.AsRecordFieldList,
|
||||
FFieldsNode.CreateAst.AsTuple,
|
||||
FNode.ScalarDefinition,
|
||||
FNode.GenericDefinition,
|
||||
FNode.StaticType
|
||||
|
||||
Reference in New Issue
Block a user