package Scripting.Evaluators is
type Evaluator is new Limited_Object with private;
type A_Evaluator is access all Evaluator'Class;
function Create_Evaluator return A_Evaluator;
procedure Evaluate_Expression
( | this | : not null access Evaluator'Class; |
expression | : String; | |
evalNode | : A_Evaluation_Node; | |
result | : in out A_Value ); |
procedure Evaluate_Script
( | this | : not null access Evaluator'Class; |
text | : String; | |
evalNode | : A_Evaluation_Node ); |