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

* using r13 and r15 is on arm thumb2 also forbidden under certain conditions for the instructions A_SUB,A_AND,A_BIC,A_EOR

Browse Source 
git-svn-id: trunk@25349 -
This commit is contained in:
florian 2013-08-23 15:22:55 +00:00
parent d5ddf39f73
commit 2fe48077b2
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/arm/rgcpu.pas
View File

@ -92,7 +92,11 @@ unit rgcpu;
for hr := RS_R8 to RS_R15 do
add_edge(getsupreg(taicpu(p).oper[0]^.reg), hr);
end;
A_ADD:
A_ADD,
A_SUB,
A_AND,
A_BIC,
A_EOR:
begin
if taicpu(p).ops = 3 then
begin
@ -138,7 +142,6 @@ unit rgcpu;
add_edge(getsupreg(taicpu(p).oper[3]^.reg),RS_R15);
end;
end;
A_LDRB,
A_STRB,
A_STR,