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

Only try to use softfpu functions when fputype is fpu_soft

Browse Source 
git-svn-id: trunk@45751 -
This commit is contained in:
pierre 2020-07-09 22:51:42 +00:00
parent cb41b22fdc
commit 96ac7f29f7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/arm/narmcnv.pas
View File

@ -113,7 +113,7 @@ implementation
function tarmtypeconvnode.first_real_to_real: tnode; function tarmtypeconvnode.first_real_to_real: tnode;
begin begin
if not(FPUARM_HAS_VFP_DOUBLE in fpu_capabilities[current_settings.fputype]) and if (current_settings.fputype=fpu_soft) and
not (target_info.system in systems_wince) then not (target_info.system in systems_wince) then
begin begin
case tfloatdef(left.resultdef).floattype of case tfloatdef(left.resultdef).floattype of