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

* ARM (thumb): do not save registers in routines marked as noreturn

Browse Source 
git-svn-id: trunk@49519 -
This commit is contained in:
florian 2021-06-20 18:14:30 +00:00
parent 15f25da1fa
commit 356afdd25b
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/arm/cgcpu.pas
View File

@ -3773,6 +3773,10 @@ unit cgcpu;
end; end;
registerarea:=0; registerarea:=0;
{ do not save integer registers if the procedure does not return }
if po_noreturn in current_procinfo.procdef.procoptions then
regs:=[];
if regs<>[] then if regs<>[] then
begin begin
for r:=RS_R0 to RS_R15 do for r:=RS_R0 to RS_R15 do