git-svn-id: trunk@32526 -
@@ -696,7 +696,7 @@ procedure _start; cdecl; public; assembler; nostackframe;
procedure _dynamic_start(r3,r4,r5,r6: pointer; r7: tdlfiniproc); cdecl; public;
begin
dlexitproc:=r7;
- save_argc_argv_envp_stkptr(ptrint(r3),ppchar(r4),r5);
+ save_argc_argv_envp_stkptr(ptrint(r3),ppchar(r4),sptr);
PASCALMAIN;
end;