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

* fixed missing swapleftright in case of substracting unsigned numbers

Browse Source 
with overflow checking turned on

git-svn-id: trunk@6818 -
This commit is contained in:
Jonas Maebe 2007-03-13 12:57:06 +00:00
parent 1205d05ba4
commit 1580e046ed
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/powerpc64/nppcadd.pas
View File

@ -325,6 +325,8 @@ begin
end; end;
subn: subn:
begin begin
if (nf_swapped in flags) then
swapleftright;
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg(A_SUB, location.register, current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg(A_SUB, location.register,
left.location.register, right.location.register)); left.location.register, right.location.register));
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CMPLD, current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CMPLD,