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

* recognise tb(n)z as branch opcode (patch by Edmund Grimley Evans)

Browse Source 
git-svn-id: trunk@30846 -
This commit is contained in:
Jonas Maebe 2015-05-14 14:42:03 +00:00
parent b60bbf26e1
commit 7395058cf3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/aarch64/cpubase.pas
View File

@ -429,7 +429,7 @@ unit cpubase;
function is_calljmp(o:tasmop):boolean;{$ifdef USEINLINE}inline;{$endif USEINLINE} function is_calljmp(o:tasmop):boolean;{$ifdef USEINLINE}inline;{$endif USEINLINE}
begin begin
is_calljmp:=o in [A_B,A_BL,A_BLR,A_RET,A_CBNZ,A_CBZ]; is_calljmp:=o in [A_B,A_BL,A_BLR,A_RET,A_CBNZ,A_CBZ,A_TBNZ,A_TBZ];
end; end;