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

* only sparc v7 and v8 require an instruction between FCMP and the branch

Browse Source 
git-svn-id: trunk@36737 -
This commit is contained in:
florian 2017-07-16 09:24:20 +00:00
parent ac894831e4
commit a7d127cf08
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/sparcgen/ncpuadd.pas
View File

@ -262,8 +262,12 @@ interface
op:=A_FCMPs; op:=A_FCMPs;
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(op, current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(op,
left.location.register,right.location.register)); left.location.register,right.location.register));
{$ifdef SPARC32}
{ Delay slot (can only contain integer operation) } { Delay slot (can only contain integer operation) }
current_asmdata.CurrAsmList.concat(taicpu.op_none(A_NOP)); if current_settings.cputype in [cpu_SPARC_V7,cpu_SPARC_V8] then
current_asmdata.CurrAsmList.concat(taicpu.op_none(A_NOP));
{$endif SPARC32}
end; end;