Refactoring Binder
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user