diff --git a/bin/TestRunner.exe b/bin/TestRunner.exe
index de20bb5a5..993299aca 100644
Binary files a/bin/TestRunner.exe and b/bin/TestRunner.exe differ
diff --git a/bin/TestRunner.pas b/bin/TestRunner.pas
index 101a0e3bd..5fc2e81ee 100644
--- a/bin/TestRunner.pas
+++ b/bin/TestRunner.pas
@@ -230,9 +230,9 @@ begin
       p.StandardInput.WriteLine('GO');
 		  //p.StandardInput.AutoFlush := true;
 		  //var p := System.Diagnostics.Process.Start(psi);
-    
-    while not p.HasExited do
-      Sleep(10);
+    p.WaitForExit();
+    //while not p.HasExited do
+    //  Sleep(5);
     if p.ExitCode <> 0 then
     begin
       System.Windows.Forms.MessageBox.Show('Running of ' + files[i] + ' failed. Exit code is not 0');
@@ -349,12 +349,14 @@ begin
       DeletePCUFiles;
       ClearExeDir;
       CompileAllRunTests(false);
+      writeln('Tests to run: '+Milliseconds()+'ms');
     end;
     
     if (ParamCount = 0) or (ParamStr(1) = '2') then
     begin
       CopyLibFiles;
       CompileAllCompilationTests('CompilationSamples', false);
+      writeln('CompilationSamples: '+Milliseconds()+'ms');
     end;
     if (ParamCount = 0) or (ParamStr(1) = '3') then
     begin
@@ -362,12 +364,12 @@ begin
       CopyPCUFiles;
       CompileAllUsesUnits;
       CompileErrorTests(false);
-      writeln('Tests compiled successfully');
+      writeln('Other tests '+Milliseconds()+'ms'+'. Tests compiled successfully ');
     end;
     if (ParamCount = 0) or (ParamStr(1) = '4') then
     begin
       RunAllTests(false);
-      writeln('Tests run successfully');
+      writeln('Tests run successfully: '+Milliseconds()+'ms');
       ClearExeDir;
       DeletePCUFiles;
     end;