Refactoring Binder

This commit is contained in:
Michael Schimmel
2025-09-17 13:34:48 +02:00
parent b972b05a07
commit ea5879520a
10 changed files with 713 additions and 507 deletions
@@ -14,7 +14,8 @@ uses
FMX.Graphics,
FMX.Objects,
Myc.Ast,
Myc.Ast.Nodes;
Myc.Ast.Nodes,
Myc.Ast.Binding;
type
TPinConnection = record
@@ -119,7 +120,7 @@ begin
connections := TList<TPinConnection>.Create;
try
// Create the scope descriptor from the execution scope provided by the binder.
rootDescriptor := TAst.CreateDescriptor(RootScope);
rootDescriptor := TAstBinder.CreateDescriptor(RootScope);
RootNode.Accept(TAstToAuraNodeVisitor.Create(Self, Self, Position, connections, nil, AMode, nil, nil, rootDescriptor));
FConnections := FConnections + connections.ToArray;
finally