mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-04 18:50:37 +02:00
fix when FPC_USE_LIBC is disabled not call PASCALMAIN
This commit is contained in:
parent
706aefb2aa
commit
bad62d51fa
@ -85,13 +85,12 @@ procedure _FPC_proc_start; assembler; nostackframe; public name '_start';
|
||||
la.got $t0, initialstkptr
|
||||
st.d $sp, $t0, 0
|
||||
|
||||
{$if defined(FPC_USE_LIBC)}
|
||||
{ call PascalMain }
|
||||
bl PASCALMAIN
|
||||
{$else}
|
||||
{$if not defined(FPC_USE_LIBC)}
|
||||
bl InitTLS
|
||||
{$endif}
|
||||
{$endif}
|
||||
|
||||
{ call PascalMain }
|
||||
bl PASCALMAIN
|
||||
break 1
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user