Build fixes
[tpg/acess2.git] / Usermode / Libraries / ld-acess.so_src / main.c
index c3a7c27..4f2ef88 100644 (file)
@@ -12,6 +12,7 @@
 \r
 // === Imports ===\r
 extern void    gLinkedBase;\r
+extern tLoadedLib      gLoadedLibraries[];\r
  \r
 // === CODE ===\r
 /**\r
@@ -35,6 +36,9 @@ int SoMain(Uint base, int arg1)
                _exit(1);\r
                for(;;);\r
        }\r
+\r
+       gLoadedLibraries[0].Base = (Uint)&gLinkedBase;\r
+       gLoadedLibraries[0].Name = "ld-acess.so";\r
        \r
        // Otherwise do relocations\r
        //ret = DoRelocate( base, envp, "Executable" );\r

UCC git Repository :: git.ucc.asn.au