paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 00:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use blx also for ARMv5, since it works on non-T variants and is required

Browse Source 
for correct operation on T-variants (patch by Dejan Boras, mantis )

git-svn-id: trunk@17001 -
This commit is contained in:
Jonas Maebe 2011-02-25 19:46:35 +00:00
parent 366a8dd966
commit b8e9fd5c00
1 changed files with 1 additions and 1 deletions

2
compiler/arm/cgcpu.pas
View File

@ -531,7 +531,7 @@ unit cgcpu;
procedure tcgarm.a_call_reg(list : TAsmList;reg: tregister);
begin
{ check not really correct: should only be used for non-Thumb cpus }
if (current_settings.cputype<cpu_armv6) then
if (current_settings.cputype<cpu_armv5) then
begin
list.concat(taicpu.op_reg_reg(A_MOV,NR_R14,NR_PC));
list.concat(taicpu.op_reg_reg(A_MOV,NR_PC,reg));