mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-31 10:50:14 +02:00
* fixed size of temporary register used to evaluate smallset<=/>=smallset
git-svn-id: trunk@25869 -
This commit is contained in:
parent
17dcd2fa31
commit
353c15fb34
@ -280,7 +280,7 @@ interface
|
||||
((nf_swapped in flags) and
|
||||
(nodetype = gten)) then
|
||||
swapleftright;
|
||||
tmpreg:=cg.getintregister(current_asmdata.CurrAsmList,location.size);
|
||||
tmpreg:=cg.getintregister(current_asmdata.CurrAsmList,left.location.size);
|
||||
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;
|
||||
|
Loading…
Reference in New Issue
Block a user