paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-28 18:03:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix _FPC_xtensa_exit first parameter passing

Browse Source
This commit is contained in:
Pierre Muller 2025-01-23 15:47:44 +00:00
parent 0914565a52
commit d959e47c83
4 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/linux/xtensa/si_c.inc
View File

@ -53,7 +53,7 @@ procedure _FPC_proc_start; assembler; public name '_start';
procedure _FPC_xtensa_exit(e:longint); assembler;
asm
mov a6,a3
mov a6,a2
movi a2,119
syscall
end;

2
rtl/linux/xtensa/si_dll.inc
View File

@ -32,7 +32,7 @@ procedure _FPC_shared_lib_start(argc : dword;argv,envp : pointer); cdecl; public
procedure _FPC_shared_lib_haltproc(e:longint); cdecl; assembler; public name '_haltproc';
asm
.L1:
mov a6,a3
mov a6,a2
movi a2,119
syscall
j .L1

2
rtl/linux/xtensa/si_prc.inc
View File

@ -55,7 +55,7 @@ procedure _FPC_dynamic_proc_start; assembler; public name '_dynamic_start';
procedure _FPC_xtensa_exit(e:longint); assembler;
asm
.L1:
mov a6,a3
mov a6,a2
movi a2,119
syscall
j .L1

2
rtl/linux/xtensa/si_uc.inc
View File

@ -92,7 +92,7 @@ procedure _FPC_proc_start; assembler; public name '_start';
procedure _FPC_xtensa_exit(e:longint); assembler;
asm
mov a6,a3
mov a6,a2
movi a2,119
syscall
end;