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

* limit min/max optimization to fastmath for now, as the NaN handling is not working yet

Browse Source 
git-svn-id: trunk@47704 -
This commit is contained in:
florian 2020-12-06 20:22:39 +00:00
parent 36eaa6c9ae
commit 8d238cfaa1
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/nflw.pas
View File

@ -1591,11 +1591,14 @@ implementation
{$ifndef llvm}
{$if defined(i386) or defined(x86_64) or defined(xtensa)}
{ use min/max intrinsic? }
if (left.nodetype in [gtn,gten,ltn,lten]) and IsSingleStatement(right,thenstmnt) and IsSingleStatement(t1,elsestmnt) and
if (cs_opt_level2 in current_settings.optimizerswitches) and
(left.nodetype in [gtn,gten,ltn,lten]) and IsSingleStatement(right,thenstmnt) and IsSingleStatement(t1,elsestmnt) and
(thenstmnt.nodetype=assignn) and (elsestmnt.nodetype=assignn) and
not(might_have_sideeffects(left)) and
tassignmentnode(thenstmnt).left.isequal(tassignmentnode(elsestmnt).left) and
{$if defined(i386) or defined(x86_64)}
{ for now, limit it to fastmath mode as NaN handling is not implemented properly yet }
(cs_opt_fastmath in current_settings.optimizerswitches) and
{$ifdef i386}
(((current_settings.fputype>=fpu_sse) and is_single(tassignmentnode(thenstmnt).left.resultdef)) or
((current_settings.fputype>=fpu_sse2) and is_double(tassignmentnode(thenstmnt).left.resultdef))