Browse Source

link all the sdk bindings .o files

Kirill Kranz 10 months ago
parent
commit
cd3a06f66e
1 changed files with 4 additions and 5 deletions
  1. 4 5
      compiler/systems/t_ps1.pas

+ 4 - 5
compiler/systems/t_ps1.pas

@@ -40,7 +40,6 @@ type
 
       procedure SetDefaultInfo; override;
       function  MakeExecutable: boolean; override;
-      procedure InitSysInitUnitName; override;
 
     end;
 
@@ -109,7 +108,7 @@ begin
     while not ObjectFiles.Empty do begin
         ObjectFilesTable.add(ExtractFileName(ObjectFiles.GetFirst));
     end;
-    
+{    
     delLib('libcard.o');
     delLib('libpress.o');
     delLib('libgpu.o');
@@ -127,7 +126,7 @@ begin
     delLib('libpad.o');
     delLib('libc2.o');
     delLib('libapi.o');
-
+}
     for i:= 0 to ObjectFilesTable.count - 1 do begin
         LinkRes.Add('INPUT(' + ObjectFilesTable[i] + ')');
     end;
@@ -406,12 +405,12 @@ begin
     result:= true;
 end;
 
-
+{
 procedure TLinkerPS1.InitSysInitUnitName;
 begin
   sysinitunit:= 'si_prc';
 end;
-
+}
 
 
 initialization