Changeset 77 for trunk/Compiler/Modules/Java/ModuleJava.pas

Timestamp:

Jun 4, 2024, 9:53:17 PM (5 months ago)

Author:

chronos

Message:

• Modified: Compiler targets moved into modules.

File:

• trunk/Compiler/Modules/Java/ModuleJava.pas (modified) (4 diffs)

trunk/Compiler/Modules/Java/ModuleJava.pas

@@ -4 +4 @@
 
 uses
-  Classes, SysUtils, ModularSystem, SourceConvertor;
+  Classes, SysUtils, ModularSystem, SourceConvertor, TargetJava;
 
 type
@@ -10 +10 @@
 
   TModuleJava = class(TModule)
+    Target: TTargetJava;
     constructor Create(AOwner: TComponent); override;
     procedure DoInstall; override;
@@ -35 +36 @@
 procedure TModuleJava.DoInstall;
 begin
+  Target := TTargetJava.Create;
+  with TCompilerAPI(API) do begin
+    RegisterTarget(TTargetJava);
+  end;
   inherited;
 end;
@@ -40 +45 @@
 procedure TModuleJava.DoUninstall;
 begin
+  with TCompilerAPI(API) do begin
+    UnregisterTarget(TTargetJava);
+  end;
   inherited;
 end;