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

m68k-amiga: only compile softfpu code into system unit, when FPU_SOFT is defined

Browse Source 
git-svn-id: trunk@33670 -
This commit is contained in:
Károly Balogh 2016-05-10 16:08:17 +00:00
parent 2dbfca4e8e
commit 7fff76d936
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/amiga/system.pp
View File

@ -25,11 +25,11 @@ interface
{$I systemh.inc}
{$I osdebugh.inc}
{$ifdef cpum68k}
{$if defined(cpum68k) and defined(fpu_soft)}
{$define fpc_softfpu_interface}
{$i softfpu.pp}
{$undef fpc_softfpu_interface}
{$endif cpum68k}
{$endif defined(cpum68k) and defined(fpu_soft)}
const
LineEnding = #10;
@ -94,7 +94,8 @@ var
implementation
{$ifdef cpum68k}
{$if defined(cpum68k) and defined(fpu_soft)}
{$define fpc_softfpu_implementation}
{$i softfpu.pp}
{$undef fpc_softfpu_implementation}
@ -110,7 +111,7 @@ implementation
{$define FPC_SYSTEM_HAS_ExtractFloat32Frac}
{$define FPC_SYSTEM_HAS_extractFloat32Exp}
{$define FPC_SYSTEM_HAS_extractFloat32Sign}
{$endif cpum68k}
{$endif defined(cpum68k) and defined(fpu_soft)}
{$I system.inc}
{$I osdebug.inc}