mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 12:29:18 +02:00
* tarmtypeconvnode.first_int_to_real should call the generic method in the parent class, if soft fpu code is generated, resolves #31350
git-svn-id: trunk@35430 -
This commit is contained in:
parent
7702ebb261
commit
c961c72c30
@ -75,6 +75,9 @@ implementation
|
|||||||
fname: string[19];
|
fname: string[19];
|
||||||
begin
|
begin
|
||||||
if (cs_fp_emulation in current_settings.moduleswitches) or
|
if (cs_fp_emulation in current_settings.moduleswitches) or
|
||||||
|
{$ifdef cpufpemu}
|
||||||
|
(current_settings.fputype=fpu_soft) or
|
||||||
|
{$endif cpufpemu}
|
||||||
(current_settings.fputype=fpu_fpv4_s16) then
|
(current_settings.fputype=fpu_fpv4_s16) then
|
||||||
result:=inherited first_int_to_real
|
result:=inherited first_int_to_real
|
||||||
else
|
else
|
||||||
|
Loading…
Reference in New Issue
Block a user