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

* cleanup of outdated defines

Browse Source
This commit is contained in:
florian 2023-01-20 23:30:52 +01:00
parent 8b3544192e
commit a06c034189
4 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/systemh.inc
View File

@ -23,7 +23,7 @@
{$modeswitch advancedrecords}
{ At least 3.0.0 is required }
{$if defined(VER1) or defined(VER2_0) or defined(VER2_2) or defined(VER2_4) or defined(VER2_6) }
{$if FPC_FULLVERSION<30000}
{$fatal You need at least FPC 3.0.0 to build this version of FPC}
{$endif}

4
rtl/linux/system.pp
View File

@ -48,9 +48,9 @@ const
function get_cmdline:Pchar; deprecated 'use paramstr' ;
property cmdline:Pchar read get_cmdline;
{$if defined(CPURISCV32) or defined(CPURISCV64) or defined(CPUARM) or defined(CPUM68K) or (defined(CPUSPARC) and defined(VER2_6)) or defined(CPUXTENSA)}
{$if defined(CPURISCV32) or defined(CPURISCV64) or defined(CPUARM) or defined(CPUM68K) or defined(CPUXTENSA)}
{$define FPC_LOAD_SOFTFPU}
{$endif defined(CPURISCV32) or defined(CPURISCV64) or defined(CPUARM) or defined(CPUM68K) or (defined(CPUSPARC) and defined(VER2_6)) or defined(CPUXTENSA)}
{$endif defined(CPURISCV32) or defined(CPURISCV64) or defined(CPUARM) or defined(CPUM68K) or defined(CPUXTENSA)}
{$ifdef FPC_SOFT_FPUX80}
{$define FPC_SOFTFLOAT_FLOATX80}

8
rtl/solaris/system.pp
View File

@ -32,18 +32,18 @@ var argc:longint;
var
StackTopPtr : pointer;
{$if defined(CPUARM) or defined(CPUM68K) or (defined(CPUSPARC) and defined(VER2_6))}
{$if defined(CPUARM) or defined(CPUM68K)}
{$define fpc_softfpu_interface}
{$i softfpu.pp}
{$undef fpc_softfpu_interface}
{$endif defined(CPUARM) or defined(CPUM68K) or (defined(CPUSPARC) and defined(VER2_6))}
{$endif defined(CPUARM) or defined(CPUM68K)}
implementation
{$if defined(CPUARM) or defined(CPUM68K) or (defined(CPUSPARC) and defined(VER2_6))}
{$if defined(CPUARM) or defined(CPUM68K)}
{$define fpc_softfpu_implementation}
{$i softfpu.pp}
@ -61,7 +61,7 @@ implementation
{$define FPC_SYSTEM_HAS_extractFloat32Exp}
{$define FPC_SYSTEM_HAS_extractFloat32Sign}
{$endif defined(CPUARM) or defined(CPUM68K) or (defined(CPUSPARC) and defined(VER2_6))}
{$endif defined(CPUARM) or defined(CPUM68K)}
{ OS independant parts}

2
rtl/win/syswin.inc
View File

@ -691,7 +691,7 @@ type
PWStrInitTablesTable = ^TWStrInitTablesTable;
TWStrInitTablesTable = packed record
count : {$ifdef VER2_6}longint{$else}sizeint{$endif};
count : sizeint;
tables : packed array [1..32767] of PWStrInitEntry;
end;