AST list refactoring
This commit is contained in:
File diff suppressed because one or more lines are too long
@@ -157,7 +157,7 @@ uses
|
||||
procedure TForm1.FormCreate(Sender: TObject);
|
||||
begin
|
||||
// 1. Initialize Environment
|
||||
FEnvironment := TAstEnvironment.Construct(TAst.CreateScope(nil));
|
||||
FEnvironment := TAstEnvironment.Construct(TAst.CreateScope(nil, nil, True));
|
||||
|
||||
// 2. Initialize AST Editor Component
|
||||
// This replaces the manual Workspace + Controller setup.
|
||||
@@ -918,7 +918,7 @@ begin
|
||||
try
|
||||
if rootNode.Kind = akBlockExpression then
|
||||
begin
|
||||
for var expr in rootNode.AsBlockExpression.Expressions do
|
||||
for var expr in rootNode.AsBlockExpression.Expressions.ToArray do
|
||||
begin
|
||||
if (expr.Kind = akVariableDeclaration) then
|
||||
begin
|
||||
|
||||
Reference in New Issue
Block a user