Browse Source

+ slowcpu define

florian 3 years ago
parent
commit
ff64dacf25
1 changed files with 8 additions and 0 deletions
  1. 8 0
      tests/bench/bdiv.pp

+ 8 - 0
tests/bench/bdiv.pp

@@ -24,7 +24,15 @@ function GetRealTime : Real;
 {$pop}
 
 const
+{$if defined(cpuarm) or defined(cpuavr) or defined(cpui8086) or defined(cpum68k) or defined(cpumips) or defined(cpuz80)}
+  {$define slowcpu}
+{$endif}
+
+{$ifdef slowcpu}
+  ITERATIONS = 32768;
+{$else slowcpu}
   ITERATIONS = 524288;
+{$endif slowcpu}
   INTERNAL_LOOPS = 64;
 
 { TTestAncestor }