Fix in Scripting

This commit is contained in:
Michael Schimmel
2025-09-23 12:51:55 +02:00
parent 2f2c93d56e
commit 46d40cfbca
3 changed files with 24 additions and 11 deletions
+2 -2
View File
@@ -25,14 +25,14 @@ type
TEvaluatorVisitor = class(TAstVisitor, IEvaluatorVisitor)
private
FScope: IExecutionScope;
procedure HandleTCO(var ResultValue: TDataValue);
protected
function IsTruthy(const AValue: TDataValue): Boolean; inline;
// Returns a closure that can create the correct type of visitor for a lambda's body.
function CreateVisitorFactory: TVisitorFactory; virtual;
procedure HandleTCO(var ResultValue: TDataValue);
property Scope: IExecutionScope read FScope;
public
constructor Create(const AScope: IExecutionScope);