Tail call optimization

2025-09-19 11:53:16 +02:00
parent 9be22dea3a
commit abbce15362
11 changed files with 169 additions and 52 deletions
@@ -13,6 +13,7 @@ type
    TAstToTextVisitor = class(TInterfacedObject, IAstVisitor)
    public
        { 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;
@@ -33,6 +34,11 @@ type

 implementation

+function TAstToTextVisitor.Execute(const RootNode: IAstNode): TDataValue;
+begin
+    Result := RootNode.Accept(Self);
+end;
+
 { TAstToTextVisitor }

 function TAstToTextVisitor.VisitAddSeriesItem(const Node: IAddSeriesItemNode): TDataValue;