Global data value refactoring + 1st scripting version
This commit is contained in:
@@ -112,10 +112,11 @@ type
|
||||
end;
|
||||
|
||||
IConstantNode = interface(IAstNode)
|
||||
// Represents a constant value in the AST (Scalar, Text, or Void).
|
||||
{$region 'private'}
|
||||
function GetValue: TScalar;
|
||||
function GetValue: TDataValue;
|
||||
{$endregion}
|
||||
property Value: TScalar read GetValue;
|
||||
property Value: TDataValue read GetValue;
|
||||
end;
|
||||
|
||||
IIdentifierNode = interface(IAstNode)
|
||||
@@ -130,20 +131,20 @@ type
|
||||
IBinaryExpressionNode = interface(IAstNode)
|
||||
{$region 'private'}
|
||||
function GetLeft: IAstNode;
|
||||
function GetOperator: TBinaryOperator;
|
||||
function GetOperator: TScalar.TBinaryOp;
|
||||
function GetRight: IAstNode;
|
||||
{$endregion}
|
||||
property Left: IAstNode read GetLeft;
|
||||
property Operator: TBinaryOperator read GetOperator;
|
||||
property Operator: TScalar.TBinaryOp read GetOperator;
|
||||
property Right: IAstNode read GetRight;
|
||||
end;
|
||||
|
||||
IUnaryExpressionNode = interface(IAstNode)
|
||||
{$region 'private'}
|
||||
function GetOperator: TUnaryOperator;
|
||||
function GetOperator: TScalar.TUnaryOp;
|
||||
function GetRight: IAstNode;
|
||||
{$endregion}
|
||||
property Operator: TUnaryOperator read GetOperator;
|
||||
property Operator: TScalar.TUnaryOp read GetOperator;
|
||||
property Right: IAstNode read GetRight;
|
||||
end;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user