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

* Fixed sqrt procedure selection on arm-wince after r27809.

Browse Source 
git-svn-id: trunk@27815 -
This commit is contained in:
sergei 2014-05-23 21:58:23 +00:00
parent cb05907e18
commit 37625211f5
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/ninl.pas
View File

@ -3752,11 +3752,11 @@ implementation
fdef: tdef;
procname: string[31];
begin
if (cs_fp_emulation in current_settings.moduleswitches)
if ((cs_fp_emulation in current_settings.moduleswitches)
{$ifdef cpufpemu}
or (current_settings.fputype=fpu_soft)
{$endif cpufpemu}
and not (target_info.system in systems_wince) then
) and not (target_info.system in systems_wince) then
begin
case tfloatdef(left.resultdef).floattype of
s32real: