|
@@ -39,11 +39,11 @@ procedure _FPC_proc_start; assembler; nostackframe; public name '_start'; public
|
|
|
|
|
|
function _strrchr(str: PAnsiChar; character: LongInt): PAnsiChar; forward;
|
|
function _strrchr(str: PAnsiChar; character: LongInt): PAnsiChar; forward;
|
|
|
|
|
|
-procedure _csu_abort; cdecl; external name '_csu_abort';
|
|
|
|
|
|
+procedure _csu_abort; cdecl; public name '_csu_abort';
|
|
begin
|
|
begin
|
|
asm
|
|
asm
|
|
int3
|
|
int3
|
|
- end;
|
|
|
|
|
|
+ end;
|
|
end;
|
|
end;
|
|
|
|
|
|
procedure _FPC_proc___start(argc: LongInt; argv: PPAnsiChar; envp: Pointer; cleanup: TCdeclProcedure); cdecl;
|
|
procedure _FPC_proc___start(argc: LongInt; argv: PPAnsiChar; envp: Pointer; cleanup: TCdeclProcedure); cdecl;
|