Tail call optimization

2025-09-19 11:53:16 +02:00
parent 9be22dea3a
commit abbce15362
11 changed files with 169 additions and 52 deletions
@@ -101,6 +101,7 @@ type
        property Connections: TList<TPinConnection> read FConnections;

        { IAstVisitor }
+        function Execute(const RootNode: IAstNode): TDataValue;
        function VisitConstant(const Node: IConstantNode): TDataValue;
        function VisitIdentifier(const Node: IIdentifierNode): TDataValue;
        function VisitBinaryExpression(const Node: IBinaryExpressionNode): TDataValue;
@@ -337,6 +338,11 @@ begin
    Result.TagString := Tag;
 end;

+function TAstToAuraNodeVisitor.Execute(const RootNode: IAstNode): TDataValue;
+begin
+    Result := RootNode.Accept(Self);
+end;
+
 function TAstToAuraNodeVisitor.TryGetDescr(const Node: IAstNode; out Text: String): Boolean;
 begin
    if FMode <> vmControlFlow then