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

* perform the high level signed division by power-of-2 optimization for all

Browse Source 
int types, larger than the ALU of the CPU, instead of just for 64-bit ints on
  32-bit or smaller CPUs.

git-svn-id: trunk@36842 -
This commit is contained in:
nickysn 2017-08-04 14:34:42 +00:00
parent afab9524f2
commit 277026ffd4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/nmat.pas
View File

@ -503,7 +503,7 @@ implementation
{ for 64 bit, we leave the optimization to the cg } { for 64 bit, we leave the optimization to the cg }
(not is_signed(resultdef)) then (not is_signed(resultdef)) then
{$else cpu64bitalu} {$else cpu64bitalu}
(((nodetype=divn) and is_64bit(resultdef)) or (((nodetype=divn) and is_oversizedord(resultdef)) or
(nodetype=modn) or (nodetype=modn) or
not is_signed(resultdef)) then not is_signed(resultdef)) then
{$endif cpu64bitalu} {$endif cpu64bitalu}