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

Add DISABLE_SYSTEMINLINE check to be able to avoid setting SYSTEMINLINE macro

Browse Source
This commit is contained in:
Pierre Muller 2022-09-20 22:39:28 +01:00
parent b8920670f4
commit 5913434ba9
3 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/macpas.pp
View File

@ -22,7 +22,9 @@ interface
{ Using inlining for small system functions/wrappers } { Using inlining for small system functions/wrappers }
{$inline on} {$inline on}
{$define SYSTEMINLINE} {$ifndef DISABLE_SYSTEMINLINE}
{$define SYSTEMINLINE}
{$endif}
type type
{$ifndef FPUNONE} {$ifndef FPUNONE}

4
rtl/inc/systemh.inc
View File

@ -29,7 +29,9 @@
{ Using inlining for small system functions/wrappers } { Using inlining for small system functions/wrappers }
{$inline on} {$inline on}
{$define SYSTEMINLINE} {$ifndef DISABLE_SYSTEMINLINE}
{$define SYSTEMINLINE}
{$endif}
{ don't use FPU registervariables on the i386 and i8086 } { don't use FPU registervariables on the i386 and i8086 }
{$if defined(CPUI386) or defined(CPUI8086)} {$if defined(CPUI386) or defined(CPUI8086)}

4
rtl/java/jsystemh_types.inc
View File

@ -28,7 +28,9 @@
{ Using inlining for small system functions/wrappers } { Using inlining for small system functions/wrappers }
{$inline on} {$inline on}
{$define SYSTEMINLINE} {$ifndef DISABLE_SYSTEMINLINE}
{$define SYSTEMINLINE}
{$endif}
{ don't use FPU registervariables on the i386 and i8086 } { don't use FPU registervariables on the i386 and i8086 }
{$if defined(CPUI386) or defined(CPUI8086)} {$if defined(CPUI386) or defined(CPUI8086)}