Browse Source

* disable timing check as it causes too much false negatives on machines under load

florian 2 years ago
parent
commit
aff133cac2
1 changed files with 3 additions and 1 deletions
  1. 3 1
      packages/rtl-generics/tests/tqsort_killer.pp

+ 3 - 1
packages/rtl-generics/tests/tqsort_killer.pp

@@ -128,8 +128,10 @@ type
 		if (prevTime > 0) and (time / prevTime > 3) then
 		if (prevTime > 0) and (time / prevTime > 3) then
 		  begin
 		  begin
 		    writeln;
 		    writeln;
-		    writeln('Bad sorting algorithm behaviour');
+		    writeln('Potentially bad sorting algorithm behaviour');
+			{ causes too many false negative
 			halt(1);
 			halt(1);
+			}
 		  end;
 		  end;
 		prevTime := time;
 		prevTime := time;
 		write(', ');
 		write(', ');