From d33ef494ad54edacae94dfac2f7c0aeafe6a1cb0 Mon Sep 17 00:00:00 2001
From: red-prig <vdpasha@mail.ru>
Date: Fri, 10 Jun 2022 00:02:05 +0300
Subject: [PATCH] +

---
 ps4_elf.pas | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/ps4_elf.pas b/ps4_elf.pas
index 17bd4655..c8f0675e 100644
--- a/ps4_elf.pas
+++ b/ps4_elf.pas
@@ -175,11 +175,6 @@ type
    stub:TMemChunk;
   end;
 
-  //pModule:packed record
-  // pStart:QWORD;
-  // pStop:QWORD;
-  //end;
-
   dtInit:QWORD;
 
   pInit:packed record
@@ -2517,12 +2512,18 @@ begin
 
  base:=mMap.pAddr;
 
+ if (Prog<>Self) then
+ begin
+  module_start(0,nil);
+ end;
+
  //if (Prog<>Self) then
  //begin
  // //dt_Init
  // TinitProc(base+dtInit)(StartupParams.argc,@StartupParams.argv,nil);
  //end;
 
+ {
  c:=pInit.dt_preinit_array_count;
  if (c<>0) then
   Case Int64(pInit.dt_preinit_array) of
@@ -2552,6 +2553,7 @@ begin
      end;
     end;
   end;
+ }
 end;
 
 Procedure Telf_file.InitProt;