Explorar el Código

* applies suggestion from Vincent to hopefully fix random lockups in the
test

git-svn-id: trunk@10524 -

Jonas Maebe hace 17 años
padre
commit
87295e4ef6
Se han modificado 1 ficheros con 1 adiciones y 0 borrados
  1. 1 0
      tests/webtbs/tw3695.pp

+ 1 - 0
tests/webtbs/tw3695.pp

@@ -64,6 +64,7 @@ begin
     //WriteLn('Loop forever inside Tester.run when compiled by FPC 1.9.8');
   end;
   thread.Terminate;
+  CheckSynchronize;
   thread.waitfor;
 end;