Ast editor unit refactoring

This commit is contained in:
Michael Schimmel
2025-11-28 14:03:49 +01:00
parent 833ce8aada
commit 0b4201fe9b
6 changed files with 284 additions and 275 deletions
+2 -2
View File
@@ -113,7 +113,7 @@ type
FCurrUnboundAst: IAstNode;
FCurrExec: TCompiledFunction;
FEnvironment: TAstEnvironment;
FWorkspace: TAuraWorkspace;
FWorkspace: TAstWorkspace;
FScriptUpdate: Boolean;
FTriggerTest: TAstEnvironment;
@@ -319,7 +319,7 @@ procedure TForm1.FormCreate(Sender: TObject);
begin
FEnvironment := TAstEnvironment.Construct(TAst.CreateScope(nil));
FWorkspace := TAuraWorkspace.Create(Panel2);
FWorkspace := TAstWorkspace.Create(Panel2);
FWorkspace.Parent := Panel2;
FWorkspace.Align := TAlignLayout.Client;
FWorkspace.ClipChildren := true;