@@ -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 }