paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-13 01:29:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Xtensa: do SAR by a constant using SRAI

Browse Source 
git-svn-id: trunk@45000 -
This commit is contained in:
florian 2020-04-22 21:03:06 +00:00
parent 5ef9a78f5f
commit 74abe87315
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

@ -515,6 +515,8 @@ implementation
end
else if (op=OP_SHL) and (a>=1) and (a<=31) then
list.concat(taicpu.op_reg_reg_const(A_SLLI,dst,src,a))
else if (op=OP_SAR) and (a>=0) and (a<=31) then
list.concat(taicpu.op_reg_reg_const(A_SRAI,dst,src,a))
else if (op=OP_SHR) and (a>=0) and (a<=15) then
list.concat(taicpu.op_reg_reg_const(A_SRLI,dst,src,a))
else if (op=OP_SHR) and (a>15) and (a<=31) then