mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-21 02:21:42 +02:00
* fixed operand order for AND-operation in smallset<=/=>smallset code
(fixes taddset, correction to r21095) git-svn-id: trunk@21294 -
This commit is contained in:
parent
6e78f5217e
commit
618a5e8e2e
@ -281,7 +281,7 @@ interface
|
||||
(nodetype = gten)) then
|
||||
swapleftright;
|
||||
tmpreg:=cg.getintregister(current_asmdata.CurrAsmList,location.size);
|
||||
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg(A_AND,tmpreg,left.location.register,right.location.register));
|
||||
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg(A_AND,left.location.register,right.location.register,tmpreg));
|
||||
current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg_reg(A_SUBcc,tmpreg,right.location.register,NR_G0));
|
||||
location.resflags:=F_E;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user