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

* probably check type for int_to_real instruction selection

Browse Source
This commit is contained in:
florian 2022-04-01 23:06:21 +02:00
parent 410c1bbaa0
commit 0978f6ce16
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/x86/nx86cnv.pas
View File

@ -274,12 +274,12 @@ implementation
if UseAVX then if UseAVX then
case location.size of case location.size of
OS_F32: OS_F32:
if is_signed(left.resultdef) then if torddef(left.resultdef).ordtype in [s32bit,s64bit] then
op:=A_VCVTSI2SS op:=A_VCVTSI2SS
else else
op:=A_VCVTUSI2SS; op:=A_VCVTUSI2SS;
OS_F64: OS_F64:
if is_signed(left.resultdef) then if torddef(left.resultdef).ordtype in [s32bit,s64bit] then
op:=A_VCVTSI2SD op:=A_VCVTSI2SD
else else
op:=A_VCVTUSI2SD; op:=A_VCVTUSI2SD;