Browse Source

Add DISABLE_SYSTEMINLINE check to be able to avoid setting SYSTEMINLINE macro

Pierre Muller 2 years ago
parent
commit
5913434ba9
3 changed files with 9 additions and 3 deletions
  1. 3 1
      rtl/inc/macpas.pp
  2. 3 1
      rtl/inc/systemh.inc
  3. 3 1
      rtl/java/jsystemh_types.inc

+ 3 - 1
rtl/inc/macpas.pp

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

+ 3 - 1
rtl/inc/systemh.inc

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

+ 3 - 1
rtl/java/jsystemh_types.inc

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