瀏覽代碼

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

git-svn-id: trunk@10524 -

Jonas Maebe 17 年之前
父節點
當前提交
87295e4ef6
共有 1 個文件被更改,包括 1 次插入0 次删除
  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;