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

+ Xtensa: use extui for and with constants

Browse Source 
git-svn-id: trunk@46664 -
This commit is contained in:
florian 2020-08-23 14:17:01 +00:00
parent 0b6501fbfb
commit ea2ae3b8f0
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/xtensa/cgcpu.pas
View File

@ -527,6 +527,8 @@ implementation
list.concat(taicpu.op_reg_reg_const(A_SRLI,dst,src,a))
else if (op=OP_SHR) and (a>15) and (a<=31) then
list.concat(taicpu.op_reg_reg_const_const(A_EXTUI,dst,src,a,32-a))
else if (op=OP_AND) and (63-BsrQWord(a)+PopCnt(QWord(a))=64) and (PopCnt(QWord(a))<=16) then
list.concat(taicpu.op_reg_reg_const_const(A_EXTUI,dst,src,0,PopCnt(QWord(a))))
else
begin
tmpreg:=getintregister(list,size);