Răsfoiți Sursa

+ added TInternalLinkerWasi class (not fully implemented, yet)

Nikolay Nikolov 1 an în urmă
părinte
comite
ddac127347
1 a modificat fișierele cu 23 adăugiri și 1 ștergeri
  1. 23 1
      compiler/systems/t_wasi.pas

+ 23 - 1
compiler/systems/t_wasi.pas

@@ -35,7 +35,7 @@ uses
   cfileutl, cutils, cclasses,
 
   import, export, aasmdata, aasmcpu,
-  fmodule, ogbase,
+  fmodule, ogbase, ogwasm,
 
   symconst, symsym, symdef, symcpu,
 
@@ -72,6 +72,15 @@ type
     function  MakeSharedLibrary:boolean;override;
   end;
 
+  { TInternalLinkerWasi }
+
+  TInternalLinkerWasi=class(tinternallinker)
+  protected
+    procedure DefaultLinkScript;override;
+  public
+    constructor create;override;
+  end;
+
 
 implementation
 
@@ -271,6 +280,19 @@ begin
   //inherited generatelib;
 end;
 
+{ TInternalLinkerWasi }
+
+procedure TInternalLinkerWasi.DefaultLinkScript;
+begin
+  {TODO}
+end;
+
+constructor TInternalLinkerWasi.create;
+begin
+  inherited create;
+  CObjInput:=TWasmObjInput;
+end;
+
 initialization
   RegisterTarget(system_wasm32_wasi_info);
   RegisterImport(system_wasm32_wasi, timportlibwasi);