Fix in Scripting

Src/AST/Myc.Ast.Binding.pas

@@ -39,8 +39,8 @@ type
 
         procedure EnterScope;
         procedure ExitScope;
-        function GetCurrentDescriptor: IScopeDescriptor;
         function IsValidIdentifier(const Name: string): Boolean;
+
     protected
         // Stack management for tail-call state is centralized here.
         function Accept(const Node: IAstNode): TDataValue; override;
@@ -65,8 +65,6 @@ type
         function TransformTernaryExpression(const Node: ITernaryExpressionNode): ITernaryExpressionNode; override;
         function TransformBinaryExpression(const Node: IBinaryExpressionNode): IBinaryExpressionNode; override;
         function TransformUnaryExpression(const Node: IUnaryExpressionNode): IUnaryExpressionNode; override;
-
-        property CurrentDescriptor: IScopeDescriptor read GetCurrentDescriptor;
     end;
 
     TBoundIdentifierNode = class(TIdentifierNode)
@@ -251,11 +249,6 @@ begin
     FCurrentDescriptor := FCurrentDescriptor.Parent;
 end;
 
-function TAstBinder.GetCurrentDescriptor: IScopeDescriptor;
-begin
-    Result := FCurrentDescriptor;
-end;
-
 function TAstBinder.IsValidIdentifier(const Name: string): Boolean;
 var
     c: Char;