Using FPC_SOFT_FPUX80 gives some problems
Original Reporter info from Mantis: DonAlfredo @DonAlfredo
-
Reporter name: Alfred
Original Reporter info from Mantis: DonAlfredo @DonAlfredo
- Reporter name: Alfred
Description:
Trunk revision 37294 and some newer introduce FPC_SOFT_FPUX80 !
Very welcome. Thanks. Is working.
However, I cannot get it to work in an easy way.
Building a win64 compiler with this define does not succeed on my system.
It does succeed if
*) some rtl source directories are included
*) some code in assemble.pas is disabled (unreachable code causes a build-error).
Additional information:
Unreachable code (3x):
{$ifdef FPC_SOFT_FPUX80}
aitrealconst_s80bit:
begin
if sizeof(tai_realconst(hp).value.s80val) = sizeof(double) then
writer.AsmWriteLn(asminfo^.comment+'value: '+double2str(tai_realconst(hp).value.s80val))
{$ifdef (true)} // <--------- rude switch
;
{$else}
else if sizeof(tai_realconst(hp).value.s80val) = sizeof(single) then
writer.AsmWriteLn(asminfo^.comment+'value: '+single2str(tai_realconst(hp).value.s80val))
else
internalerror(2017091901);
{$endif}
end;
{$endif}
Mantis conversion info:
- Mantis ID: 32502
- OS: windows
- OS Build: 10
- Build: Latest trunk rev > 37294 + 8
- Platform: x86_64
- Version: 3.1.1
- Fixed in version: 3.1.1
- Fixed in revision: 37621 (#2be94d3c)